我初学vb 数据库连接，怎么老是报错呢？

qq361161637 发布于 2015-04-01 14:38， 613 次点击

Private Sub CommandButton1_Click()
Set DBSERVER = New ADODB.Connection
Set Rs = New ADODB.Recordset

DBSERVER.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & App.Path & "\" & "xinxi.mdb;Persist Security Info=False" ' "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path + "\xinxi.mdb"

MsgBox DBSERVER.State ‘结果为1

Rs.Open "Select * From jichu " '此处报错，连接无法用于执行此操作。在此上下文中它可能已被关闭或无效

End Sub

3 回复

ainuan2015-05-25 15:18

rs.open "Select * From jichu ",dbserver,openstatic,打不出来。。。输入“，”会自己跳出来，选个就哦了

wmf20142015-05-25 17:51

缺数据源连接参数，试试Rs.Open "Select * From jichu ",DBSERVER

gcf09372018-07-17 11:28

我顶一下下，学习一下下