ADODB.Connection 时出现“找不到工程或是库”的错误

[root3646]

Private Sub Form_Load()
Dim adoC As New ADODB.Connection
Dim adoR As New ADODB.Recordset

end sub

程序运行到
Dim adoC As New ADODB.Connection 时出现“找不到工程或是库”的错误

请问我需要引用什么或是怎么设置才能解决

[flyfoolishbird]

没有引用 ado的动态连接库吧

[iwillgo2]

工程->引用，选择“Microsoft activex data objects 2.5 libarary”

[jinying]

引用 “Microsoft Activex Data Objects 2.x library”

[chenyu5188]

你没用引用ADO对象库…！！！

方法是：工程-》引用-》Microsoft Activex Data Objects 2.1 library

将Microsoft Activex Data Objects 2.1 library前打上钩就行了…！！！

祝你好运…！！！

QQ：5367778‘
http://5apc.yeah.net

[root3646]

Private Sub Form_Load()
Dim adoConnection As New ADODB.Connection
Dim adoRecordset As New ADODB.Recordset
'数据库使用的是 Northwind.mdb
adoConnection.Open "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & App.Path & "\Nwind97.mdb"

adoRecordset.Open "产品", adoConnection, adOpenKeyset (这里出 现同样错误 好象adOpenKeyset 有问题)

Set DataGrid1.DataSource = adoRecordset
FormatDataGrid DataGrid1
End Sub


在有我的机器只能找到“Microsoft Activex Data Objects 2.x library”2.1 没有2.5也可以吗？

[szgw]

对了，你要在运行之前加载
Microsoft Activex Data Objects 2.1 library
Microsoft Activex Data recordset 2.1 library
两个库
点击“工程” 选择 “引用”
找到之后，双击即可。

[root3646]

还是出错

我加的是
Microsoft Activex Data Objects 2.1 library
Microsoft Activex Data Objects recordset 2.5 library


这行 adoRecordset.Open "产品", adoConnection, adOpenKeyset
的adOpenKeyset处还是出错（找不到工程或库）

这段程序是我下的
请大家试试
用 DataReport 打印 DataGrid
http://www.triaton.com.cn/Private/Zip/DatGrdRpt.zip

[孔方发发]

我的经历,重新建立一个新工程,把所有的窗体呀,什么的加入就好了

[root3646]

新工程好办法！
可是
DataReport1怎么添加？

看来今天我那里都有问题了！多谢各位了
那位对打印有兴趣请试试
http://www.triaton.com.cn/Private/Zip/DatGrdRpt.zip