Access 2007 VBA 中的记录集失败答案

【问题标题】：Recordset fails in Access 2007 VBAAccess 2007 VBA 中的记录集失败
【发布时间】：2011-06-18 06:37:59
【问题描述】：

我正在用 Access VBA 编写代码。使用记录集时遇到问题。这是我在代码的第一行中的内容：

Dim rst As Recordset
Dim sql as String

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

程序在第二行“set rst= .....”中失败。我添加了以下参考：适用于应用程序的 Visual Basic， Microsoft Access 12.0 对象库， OLE自动化， Microsoft ActiveX 数据对象 2.8 库

但程序在第二行仍然失败。还有什么我应该做的吗？？？谢谢，

【问题讨论】：

【解决方案1】：

Currentdb 是 DAO 代码，但您声明您有 ADO 引用。删除 ADO 引用并添加 Microsoft Office 12.0 Access 数据库引擎对象库。

如果这是 Access 2000、2002 或 2003，我建议添加 Microsoft DAO 3.6 对象库。

【讨论】：

我删除了 ADO 引用。现在我有以下参考资料：Visual Basic for Applications、Microsoft Access 12.0 对象库、OLE 自动化和 Microsoft Office 12.0 Access 数据库引擎对象库。但问题仍然存在。有什么想法吗？？