Dim My_Query As String
My_Query = cbosearch & " " & Cbo_Operator & " " & txtsearch.Text & "'"
Data1.RecordSource = "SELECT * FROM General WHERE " & My_Query
Data1.Refresh
Data1.Recordset.MoveLast: Data1.Recordset.MoveFirst
MsgBox Data1.Recordset.RecordCount & " matches found."
Exit Sub
Does anyone see a syntax error?
