-
Using the following code:
Set db = DBEngine.Workspaces(0).OpenDatabase("C:\access files\S and B.mdb")
List1.Clear
Select Case Index
Case 0:
sSQL = "Select * from [Customers Query Name] where [Company Name] Like '" & Text1.Text & "*'"
Set rs = db.OpenRecordset(sSQL, dbOpenDynaset)
List1.Enabled = False
I get an error on my set rs line but when I look at a different database with fewer tables in, its fine any ideas??
-
Maybe you could use an error handler and message box
on error goto Handler
.
.
.
Handler :
msgbox err.description
to get better details of the problem
-
get rid of dbOpenDynaset and try it again, sometimes those parameters cause errors in certain situations....
