Страница: 1 |
Помогите люди добрые. Хочу получить дату и время с сервера вот каким образом. На сервере процедура: CREATE PROCEDURE get_datetime @data_time datetime OUTPUT AS select @data_time = getdate() return 0 GO В VB6 пишу следующее: Dim rs As adodb.Recordset Dim cmd As New adodb.Command Dim prm1 As adodb.Parameter Dim prm2 As adodb.Parameter Set cmd.ActiveConnection = dbOP cmd.CommandText = "get_datetime" cmd.CommandType = adCmdStoredProc Set prm1 = cmd.CreateParameter("Return", adInteger, adParamReturnValue) cmd.Parameters.Append prm1 Set prm2 = cmd.CreateParameter("Output", adDBTimeStamp, adParamOutput) cmd.Parameters.Append prm2 cmd.Execute cmd(0) - Пусто cmd(1) - Пусто Вопрос: ПОЧЕМУ?
у меня все сработало... попробуй... 1. в строчке Set cmd.ActiveConnection = dbOP не писать set, то бишь: cmd.ActiveConnection = dbOP 2. Я не вижу из кода правильно ли ты открываешь и открываешь ли коннект к базе данных... 1-й вариант ничего не дает. Вот строка соединения: dbOP.Open "Provider=MSDASQL.1;Persist Security Info=False;User ID=loginata Source=OP", "login", "password" Попробуй так, у меня АДО 2.7, ну я думаю и с вариантами пониже версией должно работать, аунтификация встроенная на SQL Сервере Provider=SQLOLEDB.1;Password=[здесь пароль];Persist Security Info=True;User ID=[имя юзера];Initial Catalog=[название базы данных]ata Source=[имя сервера] Спасибо, помогло. Страница: 1 |
Вопрос: Хранимая Процедура на SQL Server 2000 не возвра...
Добавлено: 12.09.02 12:58
Автор вопроса: Evgeny D
Ответы
Всего ответов: 4
Номер ответа: 1
Автор ответа:
Гибыч
Вопросов: 1
Ответов: 58
Профиль | | #1
Добавлено: 12.09.02 13:49
Номер ответа: 2
Автор ответа:
Evgeny D
Вопросов: 10
Ответов: 33
Профиль | | #2
Добавлено: 12.09.02 13:57
Номер ответа: 3
Автор ответа:
Гибыч
Вопросов: 1
Ответов: 58
Профиль | | #3
Добавлено: 12.09.02 14:16
Номер ответа: 4
Автор ответа:
Evgeny D
Вопросов: 10
Ответов: 33
Профиль | | #4
Добавлено: 12.09.02 14:19