|
-
Sep 6th, 2000, 06:26 PM
#1
Thread Starter
Lively Member
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?
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|