Private Sub Command7_Click()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\VB\电话号码\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select * from 表1 where 电话号码 ='" & "1100" & "'"
Adodc1.Refresh '对查询更新
DataGrid1.Refresh
End Sub
但每次都出现以下内容,我找到的答案说是没跟MDB连接,但我是可以在DATAGRID1那里看到数据库的内容,应该是有连接才对啊。。。请各位高手出手相助...
对象”refresh“的方法‘iadodc’失败
參考答案:用On Error Resume Next的方法避开错误
再用Select 语句再打开数据库,就有了.