Переходя от формы к запросу в Access/SQL/VB

Question

Access 2007/SQL/VB У меня есть запрос:

SELECT Count(*) AS CountOfCR1 
FROM PData 
WHERE (((PData.DestID)='CR1') And (((PData.AnswerTime)>=Starting)<Ending+1)); 

Я пытаюсь передать переменные Запуск и завершение в приведенном выше запросе из ниже форма:

Starting = StartDate & " " & StartTime 
Ending = EndDate & " " & EndTime 
On Error GoTo Err_Command5_Click 
Dim stDocName As String 
stDocName = "CountOfCR1 : Query" 
DoCmd.OpenQuery stDocName, acNormal, acEdit 
Exit_Command5_Click: 
Exit Sub 
Err_Command5_Click: 
MsgBox Err.Description 
Resume Exit_Command5_Click 

Как передать начальную и конечную дату из моей формы в мой запрос?

Answer 1

Обычный способ сделать это, чтобы обратиться к форме в запросе:

SELECT Count(*) AS CountOfCR1 
FROM PData 
WHERE PData.DestID='CR1' 
And PData.AnswerTime Between Forms!MyForm!StartDate + Forms!MyForm!StartTime 
        And Forms!MyForm!EndDate + Forms!MyForm!SEndTime 

Это почти всегда лучше использовать форму с RecordSource, установленной в запрос или SQL строки, а не открывать запрос. С помощью формы вы можете использовать аргумент Where метода OpenForm.