Передать параметры

inwin
Дата: 27.05.2004 15:30:24
Народ просветите меня темного.
Как мне передать такие парметры в запрос
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])

Где то ошибка в синтаксе, где не могу найти
Kelme
Дата: 27.05.2004 15:39:54
dim qd as DAO.QueryDef
dim rst as DAO.Recordset
 set qd = currentdb.QueryDef("Рек_ост")
 qd!parDate1 = ....
 qd!parDate2 = ....

 set rst = qd.OpenRecordset