Private Sub MDIForm_Load()
frmViewList.Show
Set dbBooks = OpenDatabase("D:\vb\我正在做的系统\database\db2.mdb")
frmViewList.display dbBooks, Me, "publishers"
End Sub
上面红色的代码出 问题
byref参数类型不符
是什么原因？
在线等

新学的，不知道意思
Set dbBooks = OpenDatabase("D:\vb\我正在做的系统\database\db2.mdb")
OpenRecordset 要这个有什么作用

Private Sub MDIForm_Load()
frmViewList.Show
Set dbBooks = OpenDatabase("D:\vb\我正在做的系统\database\db2.mdb")
set dbBooks = OpenRecordset("D:\vb\我正在做的系统\database\db2.mdb")
frmViewList.display dbBooks, Me, "publishers"
End Sub
可以加这么 一条语句吗？

辛苦了 simpson 谢谢你给了我多信息

刚 那段搞定了
可是 又有 一段代码出了 问题
Private Sub MDIForm_Load()
frmViewList.Show
Dim dbBooks As Database
Dim dbrst As Recordset
Set dbBooks = OpenDatabase("D:\vb\我正在做的系统\database\db2.mdb")
Set dbrst = dbBooks.OpenRecordset("publishers", dbOpenTable)
frmViewList.display dbBooks, Me, "publishers"
End Sub
说是不可识别的
是不是我的路径不对
要不要一定要是C盘目录下

要不要他的路径一定要在ACCESS的根目录下面才行啊

谢谢了
我这个问题昨天晚上已经搞定了
不过还是 有个问题，希望你能帮我搞定下
在http://bbs.bc-cn.net/viewthread.php?tid=186060