kaei株式会社化妆品:在VB中查找Access数据库的问题
来源:百度文库 编辑:神马品牌网 时间:2024/09/01 18:33:52
假设数据库access.mdb
其中有表ABC,表中包含Product等键.
现在要查找表中的数据,程序如下:
Private Sub Form_Load()
Data1.DatabaseName = "c:\access.mdb"
Data1.RecordSource = "ABC"
Data1.Refresh
End Sub
Private Sub Command1_Click()
Data1.Recordset.FindFirst "Product =" & Text1.Text & "'"
If Data1.Recordset.NoMatch = True Then
MsgBox "未找到相应记录", , "错误"
Else
…
End If
End Sub
运行提示: 这种对象类型不支持该操作
请问该如何解决这个问题?
谢谢~
其中有表ABC,表中包含Product等键.
现在要查找表中的数据,程序如下:
Private Sub Form_Load()
Data1.DatabaseName = "c:\access.mdb"
Data1.RecordSource = "ABC"
Data1.Refresh
End Sub
Private Sub Command1_Click()
Data1.Recordset.FindFirst "Product =" & Text1.Text & "'"
If Data1.Recordset.NoMatch = True Then
MsgBox "未找到相应记录", , "错误"
Else
…
End If
End Sub
运行提示: 这种对象类型不支持该操作
请问该如何解决这个问题?
谢谢~
Data1.Recordset.FindFirst ("Product ='" & Text1.Text & "'" )
你需要通过ado,操作,你代码不对,要添加odbc源。然后进行。