Recordset fails in Access 2007 VBA

Question

I am writing a code in Access VBA. I am facing an issue when using a recordset. Here is what I have in the first lines of my code:

Dim rst As Recordset
Dim sql as String

sql = "Select ........"
Set rst = CurrentDb.OpenRecordset(sql, dbReadOnly)

The program fails in the second line " set rst= .....". I added the following references: Visual Basic for Applications, Microsoft Access 12.0 Object library, OLE automation, Microsoft ActiveX Data Objects 2.8 Library

But the program still fails in the second line. Is there anything else I should do??? Thanks,

I also tried Dim rst As DAO.Recordset. but no luck

guest1
– guest1

2011-01-30 22:36:04 +00:00
Commented Jan 30, 2011 at 22:36 — guest1
– guest1, Commented Jan 30, 2011 at 22:36

Tony Toews · Accepted Answer · 2011-01-30 22:49:06Z

1

Currentdb is DAO code but you state you have an ADO reference. Remove the ADO reference and add the Microsoft Office 12.0 Access database engine Object Library.

If this were Access 2000, 2002 or 2003 I'd suggest adding the Microsoft DAO 3.6 Object Library.

answered Jan 30, 2011 at 22:49

Tony Toews

7,8931 gold badge24 silver badges27 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

guest1 Over a year ago

I removed the ADO reference. Now I have the following references: Visual Basic for Applications, Microsoft Access 12.0 Object library, OLE automation, and Microsoft Office 12.0 Access database engine Object Library. But the problem still remains. Any idea??

Collectives™ on Stack Overflow

Recordset fails in Access 2007 VBA

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related