Здравствуйте!!!
у меня не получается поиск по дате. дату я выбираю из DTpicker. Вот код программы.
Private Sub Command1_Click()
Dim x1 As Date
Dim str As String
x1 = Format$(DTPicker1.Value, dd - mm - yyy)
str = "select * from Booking where DateFrom=" & Chr(35) & x1 & Chr(35)
Data3.RecordSource = str
Data3.Refresh
With DBGrid1
.ClearFields
.ReBind
.SetFocus
End With
End Sub

выдает такую ошибку
syntax error in date in query expression 'datefrom=# #'.