i have this code which was working fine before adding the last line to search by date
Code: Select all
Dim sql As String
sql = "SELECT qrySearch.* FROM qrySearch " _
& " Where FirstName Like '*" & Me.txtSearch & "*'" _
& " OR SecondName Like '*" & Me.txtSearch & "*'" _
& " OR ThirdName Like '*" & Me.txtSearch & "*'" _
& " OR FirstName_Mother Like '*" & Me.txtSearch & "*'" _
'& " OR Assistant_Date Like #" & Format(Me.txtSearch, "mm/dd/yyyy") & "#"
Me.sbf_SearchData.Form.RecordSource = sql
Me.sbf_SearchData.Form.Requery
Regards