G
Guest
I am trying to get a simple search form to work, and I know there is a syntax
problem, I have been working on this for +3 weeks and I am absolutely stuck
now. In an If statement, this is one of my else's:
Category is a field name, qManufacturer (by alpha) is the query
Option Compare Database
Option Explicit
Dim db As Database
Dim rs(3) As Recordset
Dim sql As String
---------
ElseIf Me.Category <> "" Then
sql = "SELECT * FROM 'qManufacturer (by alpha)'"
sql = sql & "WHERE Category" = Me.Category
Set rs(1) = db.OpenRecordset(sql, dbOpenTable)
Set rs(1) = db.OpenRecordset(sql, dbOpenSnapshot)
On Error GoTo Err_FindRecords_Click
DoCmd.OpenTable (rs(1))
ElseIf...
It always returns "...The database engine couldn't find the object 'False'
.... ", but that is the only way I can get the SELECT syntax to work. Any
advice is SUPER appreciated (=. Thank you.
problem, I have been working on this for +3 weeks and I am absolutely stuck
now. In an If statement, this is one of my else's:
Category is a field name, qManufacturer (by alpha) is the query
Option Compare Database
Option Explicit
Dim db As Database
Dim rs(3) As Recordset
Dim sql As String
---------
ElseIf Me.Category <> "" Then
sql = "SELECT * FROM 'qManufacturer (by alpha)'"
sql = sql & "WHERE Category" = Me.Category
Set rs(1) = db.OpenRecordset(sql, dbOpenTable)
Set rs(1) = db.OpenRecordset(sql, dbOpenSnapshot)
On Error GoTo Err_FindRecords_Click
DoCmd.OpenTable (rs(1))
ElseIf...
It always returns "...The database engine couldn't find the object 'False'
.... ", but that is the only way I can get the SELECT syntax to work. Any
advice is SUPER appreciated (=. Thank you.