Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Передать параметры / 2 сообщений из 2, страница 1 из 1
27.05.2004, 15:30
    #32536973
inwin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Передать параметры
Народ просветите меня темного.
Как мне передать такие парметры в запрос
Forms!ПЛ_А_отчеты!дата1, Forms!ПЛ_А_отчеты!дата2
таким вот образом не получается:

Forms!ПЛ_А_отчеты!дата1 = DateSerial(Year(Now()), Month(Now()) - 1, 1)
Forms!ПЛ_А_отчеты!дата2 = DateSerial(Year(Now()), Month(Now()) - 1, DateDiff("d", DateSerial(Year(Now()), Month(Now()) - 1, 1), DateSerial(Year(Now()), Month(Now()), 1)))

Set rcdРек_ост = dbПлат.OpenRecordset("Рек_ост", DB_OPEN_DYNASET, [Forms!ПЛ_А_отчеты!дата1], [Forms!ПЛ_А_отчеты!дата2])

Где то ошибка в синтаксе, где не могу найти
...
Рейтинг: 0 / 0
27.05.2004, 15:39
    #32536995
Kelme
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Передать параметры
Код: plaintext
1.
2.
3.
4.
5.
6.
dim qd as DAO.QueryDef
dim rst as DAO.Recordset
 set qd = currentdb.QueryDef("Рек_ост")
 qd!parDate1 = ....
 qd!parDate2 = ....

 set rst = qd.OpenRecordset
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Передать параметры / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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