JohnnyT |
---|
Добрый день! Искал ответ на свой вопрос в прочих темах - не нашел, посему обращаюсь за помощью. Задача: необходимо задать условие на значение в открываемом запросе stat_по_исполнителям по полю Дата внесения записи. Данные для запроса формируются из таблицы Документы_поручения. Одновременно значение даты (т.е. условия отбора) вводятся в открытую форму form1 в поле Поле1, которое служит значением переменной parb. Написал такой код:
Private Sub Кнопка0_Click()
Dim parb As Date parb = Поле1
Dim db As Database, request As QueryDef Set db = CurrentDb Set request = db.QueryDefs("stat_по_исполнениям") request.sql = "SELECT Документы_поручения.[Дата внесения записи] FROM Документы_поручения WHERE ((Документы_поручения.[Дата внесения записи] >= parb))"
Set db = Nothing Set request = Nothing DoCmd.OpenQuery stat_по_исполнениям, acViewNormal, acAdd
End Sub
Заранее спасибо! |
Да, собственно, вопрос такой: при выполнении кода открываемый запрос выдает окно с запросом параметра
parb, в чем ошибка в плане того, что нужно сделать, чтобы условие WHERE в запросе sql "увидело" значение переменной
parb ?