VB6 ADODC的find方法出错的问题
Private Sub cmdfind_Click() '查找数据
Dim str As String
Dim mybookmark As Variant
mybookmark = Adodc1.Recordset.Bookmark
str = InputBox("输入查找表达式", "如年龄=9", "查找")
Text2.Text = mybookmark
Text3.Text = str
If str = "" Then Exit Sub
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find str
If Adodc1.Recordset.EOF Then
MsgBox "指定的条件没有匹配的记录", , "信息提示"
Adodc1.Recordset.Bookmark = mybookmark
End If
End Sub
当输入“年龄=9”之类的时候可以找到要找的数据,可是输入“姓名=XX”时候就显示参数类型不正确或不在可以接受的范围之内或与其它参数冲突。我把“XX”加上引号也不行的。
哪位高手指点一下?
[解决办法]
Find 方法必须考虑数据类型,并且每次只能一个字段,find方法最后一个参数要adbookmarkfirst(忘记是否是默认),否则,有可能会找不到
字符类型='XX'
数值类型=10
日期类型=#2011-1-1#
[解决办法]
先 检测 SQL 语句 " Where 姓名='XX'" 是否正确.
[解决办法]
http://download.csdn.net/source/1644211