Access 2013 项目中不存在 ADODB，如何添加对它的引用答案

【问题标题】：ADODB doesn't exist in Access 2013 project, how do I add a reference to itAccess 2013 项目中不存在 ADODB，如何添加对它的引用
【发布时间】：2014-05-15 17:35:26
【问题描述】：

我正在尝试在 Access 2013 as 和 mdb 中重建 Access adp 项目。这些表都是两个版本中的链接表，所以这不是问题。

我已经从旧项目中导入了表单，所以表单布局和代码都在那里。

我在尝试执行以下代码时遇到问题：

Dim cmd As New ADODB.Connection, RS As New ADODB.Recordset
cmd.ActiveConnection = connectionString
Debug.Print connectionString
cmd.ActiveConnection.CursorLocation = adUseClient
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "sp_Myproc"
cmd.Parameters.Refresh
cmd(1) = Me.my_id
Set RS = cmd.Execute

'Should be checking if record set is open and explicitly close it. JWS
If RS.State = 1 Then
RS.Close
Set RS = Nothing
End If

cmd.ActiveConnection.Close

我无法声明 cmd 和 RS 变量，因为 ADODB 似乎不存在。我如何在 Access 中引用它或完成此操作的正确方法是什么？

【问题讨论】：

在 VBA 编辑器中，您是否验证了 ADODB 引用已启用？（菜单“工具”>“参考...”，并确认“Microsoft ActiveX 数据对象 x.x 库”已选中）。进一步参考here。
谢谢。我通常生活在 Visual Studio 中，所以我在 VBA 编辑器中的元素有点过时。

标签： vba ms-access adodb ms-access-2013

【解决方案1】：

正如我在评论中所写，您需要检查 ADODB 引用是否已启用：

在 VBA 编辑器上，单击“工具”菜单，然后单击“参考...”
验证“Microsoft ActiveX 数据对象 x.x 库”的复选标记是否已激活；如果不是，请激活它。

进一步参考：Using ADO with Microsoft VB & VBA

【讨论】：

那么问题就变成了我真的应该使用 ADO 还是有更好的首选方法？
@JohnS 我能想到的替代方案是使用 DAO ......但它更旧。我使用它，我没有任何问题，但由您决定哪个对您更方便；）如果您已经使用 ADO 编写了代码，那么简单地启用它会更容易。
仅供参考，我坚持使用 ADO，以便他们可以在技术被淘汰之前获得更多年。感谢您的帮助。