UC知道VB中打开数据库的问题
来源：百度知道 编辑：UC知道 时间：2024/06/06 02:20:54
Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase(App.Path & "\xueyaji1.mdb")
Set rs = db.OpenRecordset("血压计数据库")
........
然后系统调试的时候说是
Set rs = db.OpenRecordset("血压计数据库") 错了
代码是
Run-time error '13';
Type mismatch
请问是什么错误啊
谢谢
Dim rs As Recordset
Set db = OpenDatabase(App.Path & "\xueyaji1.mdb")
Set rs = db.OpenRecordset("血压计数据库")
........
然后系统调试的时候说是
Set rs = db.OpenRecordset("血压计数据库") 错了
代码是
Run-time error '13';
Type mismatch
请问是什么错误啊
谢谢
Dim db As dao.Database
Dim rs As dao.Recordset
Set db = OpenDatabase(App.Path & "\xueyaji1.mdb")
Set rs = db.OpenRecordset("血压计数据库")
这明显是数据类型不匹配的问题
你应该这么写
Set rs = db.OpenRecordset("数据表的名称")
确保有xueyaji1.mdb中“血压计数据库”这个数据表么?