7,763
社区成员
发帖
与我相关
我的任务
分享为什么在我在设计时用opendatabase打不开mdb数据库？
我的语句：
dim dbMat as database
set dbMat=dbengine.workspace(0).opendatabase("g:\**\***\×××.mdb")
为什么在程序中运行到这一句是总出现“不识别数据库”错误？
msdn说需要引用access data object libary 3.5，我找了好久也没找到，应该是引用那个文件呢？或者什么地方设置不对？？？
dim dbMat as database
set dbMat=dbengine.workspace(0).opendatabase("g:\**\***\×××.mdb")
为什么在程序中运行到这一句是总出现“不识别数据库”错误？
msdn说需要引用access data object libary 3.5，我找了好久也没找到，应该是引用那个文件呢？或者什么地方设置不对？？？
...全文
请发表友善的回复…
发表回复
gene000 2003-03-11
- 打赏
- 举报
工程->引用
可以找到access data object libary 3.5
可以找到access data object libary 3.5
flyjeep 2003-03-11
- 打赏
- 举报
我有引用阿，还是不行！！
唉。。郁闷..
唉。。郁闷..
flyjeep 2003-03-11
- 打赏
- 举报
解决了！
感谢大家提供思路！尤其谢谢芋头大哥！
感谢大家提供思路！尤其谢谢芋头大哥！
flyjeep 2003-03-11
- 打赏
- 举报
现在数据库事可以打开了，但打不开里面的表：“类型不匹配，错误13”
我的句子：
Set dbMaterial = DBEngine.Workspaces(0).OpenDatabase("G:\JeepH\Test Project\BESS\Data\Material.mdb")
Dim rcMaterial As Recordset
Set rcMaterial = dbMaterial.OpenRecordset("Material", dbOpenDynaset) '执行到这一句时出错！
我的句子：
Set dbMaterial = DBEngine.Workspaces(0).OpenDatabase("G:\JeepH\Test Project\BESS\Data\Material.mdb")
Dim rcMaterial As Recordset
Set rcMaterial = dbMaterial.OpenRecordset("Material", dbOpenDynaset) '执行到这一句时出错！
holydiablo 2003-03-11
- 打赏
- 举报
库应该是已经引用了，否则执行不到这一步
你改成
dim dbMat as dao.database
set dbMat=workspace(0).opendatabase("g:\**\***\×××.mdb")
试试，注意你的MDB文件路径一定得准确哦
你改成
dim dbMat as dao.database
set dbMat=workspace(0).opendatabase("g:\**\***\×××.mdb")
试试，注意你的MDB文件路径一定得准确哦
northwolves 2003-03-10
- 打赏
- 举报
microsoft DAO 3.6 object library 更好一些
northwolves 2003-03-10
- 打赏
- 举报
引用microsoft DAO 3.5 object library
flyjeep 2003-03-10
- 打赏
- 举报
怎么媒人来看看啊！好郁闷。。。。。。
