Гость
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как передать параметры в сохранённую процедуру. / 3 сообщений из 3, страница 1 из 1
17.10.2002, 17:13
    #32059351
Kourdikov Sergey
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как передать параметры в сохранённую процедуру.
Уважаемые Мэтры.

Ситуация следующая:
Есть сохранённая процедура на стороне SQL-сервера, которая принимает два параметра (дата начала периода и дата конца).
Есть ODBC-запрос с именем "Query1" в A2002:
SELECT * FROM P_STATACTIVITY ('01.09.2002', '30.09.2002');
P_STATACTIVITY - имя сохранённой процедуры. Даты - параметры приведённые для примера.
Есть отчёт, который в качестве источника данных использует выражение:
Me.RecordSource="SELECT * FROM Query1"

А теперь вопрос:
Как мне передавать не константы в качестве параметров, а, например, глобальные переменные, поля формы и т.д.

Что не хотелось бы делать !
Передавать параметры в процедуру через данные из какой-либо таблицы.
Изменять строку запроса непосредственно перед его исполнением, подставляя новые выражения строковых констант.

Проблема насущная. Буду признателен, если кто-нибудь что-нибудь подскажет. :-)
...
Рейтинг: 0 / 0
17.10.2002, 17:24
    #32059358
ДиД
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как передать параметры в сохранённую процедуру.
Private Sub Form_Open(Cancel As Integer)
Dim rst As ADODB.Recordset
Dim cmd As ADODB.Command, prm As ADODB.Parameter
Dim cnn As ADODB.Connection

Set cnn = New ADODB.Connection
With cnn
.Provider = "SQLOLEDB"
.Properties("Data Source") = "LUNA"
.Properties("Initial Catalog") = "Manhattan"
.Properties("Integrated Security") = "SSPI"
.Open
End With

Set cmd = New ADODB.Command
Set rst = New ADODB.Recordset
cmd.ActiveConnection = cnn
'rst.Open "select * from class", cnn
cmd.CommandText = "[хп]"
cmd.CommandType = adCmdStoredProc
Set prm = cmd.CreateParameter("t", adInteger, adParamInput, , 1)
cmd.Parameters.Append prm
rst.Open cmd, , adOpenKeyset, adLockOptimistic, adCmdStoredProc
Set Me.Recordset = rst
rst.Close
End Sub
...
Рейтинг: 0 / 0
17.10.2002, 17:45
    #32059370
Kourdikov Sergey
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как передать параметры в сохранённую процедуру.
Уважаемый Дид.

Собственно Вашего ответа я и ожидал.
К своему стыду, я понятия не имею, что такое ADO, плохо представляю технологию OLE и как следствие, пока ничего не понял из того, что Вы написали.

Я разберусь.

У меня есть одна небольшая просьба. Есть ли какой-либо способ связаться с Вами не через форум ? К примеру ICQ или E-Mail ?
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как передать параметры в сохранённую процедуру. / 3 сообщений из 3, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]