Vb.net 使用AdO连接数据库错误

Question

以下代码为什么老在 Cnn.open(CnnStr) 显示 “未找到提供程序。该程序可能未正确安装。”? 已经有引用ADODB.

Imports System.Data.OleDb
Imports ADODB
Dim Cnn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Dim CnnStr As String = "Provider= Microsoft.Jet.OLEDB.12.0; Data Source = D:\dsstock1.mdb"
Cnn.Open(CnnStr)
Dim SelStr As String = "Select * from Agent"
Rs.Open(Cnn, SelStr, 1, 3)
Rs.AddNew("MPN","first one")
Rs.Update()
Rs.Close()
Cnn.Close()

Answer 1

发现问题了： Microsoft.Jet.OLEDB.12.0 是错误的。

Microsoft.Jet.OLEDB.4.0 和 Microsoft.Ace.OLEDB.12.0 是正确的。