1180
社区成员
- 主页
在一个程序中是否可以同时用ado和dao对同一数据库进行操作？
在一个程序中，同时引用了ado2.5和dao3.51，对一数据库进行操作。
Private Sub sjgx_Click()
Dim dbsjrtygz As Database
Dim rsttygzmx As Recordset
Dim rstacctset As Recordset
Set dbsjrtygz = OpenDatabase("jrtygz.mdb")
MsgBox "数据库：金融同业账户跟踪" & dbsjrtygz.Name & "已正常打开"
Set rstacctset = dbsjrtygz.OpenRecordset("accountset", dbOpenDynaset)
执行到最后的一条语句时会报错“类型不匹配”
但若在只引用dao3.51的情况下则一切正常，但是程序的某段需要引用ado2.5,不知是不是
在一程序中不能同时引用ado和dao？
Private Sub sjgx_Click()
Dim dbsjrtygz As Database
Dim rsttygzmx As Recordset
Dim rstacctset As Recordset
Set dbsjrtygz = OpenDatabase("jrtygz.mdb")
MsgBox "数据库：金融同业账户跟踪" & dbsjrtygz.Name & "已正常打开"
Set rstacctset = dbsjrtygz.OpenRecordset("accountset", dbOpenDynaset)
执行到最后的一条语句时会报错“类型不匹配”
但若在只引用dao3.51的情况下则一切正常，但是程序的某段需要引用ado2.5,不知是不是
在一程序中不能同时引用ado和dao？
...全文
请发表友善的回复…
发表回复
wuzhu 2002-02-25
你的对象声明时加上类库
dim rs as adodb.recordset
dim mdb as dao.database
dim rs as adodb.recordset
dim mdb as dao.database
hovoy 2002-02-25
人家都说了,我没的说了
hovoy 2002-02-25
可以
xiaobinliu 2002-02-25
当然可以同时使用ado2.5和dao3.51，就相当于你可以同时使用两个名字不同
但功能相同的函数一样，但是没有这样的必要，用ado2.5就可以完成数据库操作了
Dao中得
Set dbsjrtygz = OpenDatabase("jrtygz.mdb")可以用ado2.5中得Connection
对象代替
但功能相同的函数一样，但是没有这样的必要，用ado2.5就可以完成数据库操作了
Dao中得
Set dbsjrtygz = OpenDatabase("jrtygz.mdb")可以用ado2.5中得Connection
对象代替
phide 2002-02-25
现在很少人还用DAO了。
bucher 2002-02-25
Dim rsttygzmx As DAO.Recordset
Fanks 2002-02-25
有这必要吗？
dbcontrols 2002-02-25
http://www.wzjcw.net/vbgood/taishan/index.html的迷你数据库浏览器就是同时引用的
dbcontrols 2002-02-25
能同时引用ado和dao