vba - 运行时错误 '3706' : Provider cannot be found -Visual Basic

Question

我正在尝试使用 ADODB 将 Visual Basic 连接到 MS Access。但当我执行代码时，它提示:“找不到提供程序。它可能未正确安装。”但是当我检查我的目录时，我已经安装了“msjetoledb40.dll”。

这是我的代码:

Dim conn As ADODB.Connection, rec As ADODB.Recordset

    Sub sample()

    Set conn = New ADODB.Connection

    conn.Open ("Provider=Microsoft.Jet.OLEDB 4.0;Data Source=C:\sample.mdb;Persist Security Info=false;")
End Sub

Answer 1

这样会更好:

Sub sample()

  Dim conn As ADODB.Connection, rec As ADODB.Recordset
  Set conn = New ADODB.Connection
  conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\sample.mdb;"
  conn.Open
End Sub

你错过了一点。

Microsoft.Jet.OLEDB 4.0 => Microsoft.Jet.OLEDB.4.0

引用号:http://www.connectionstrings.com/ .