UC知道vb记录集问题
来源：百度知道 编辑：UC知道 时间：2024/06/05 09:36:58
Set cn_contact = New ADODB.Connection
Set rs_contact = New ADODB.Recordset
rs_contact.Open "select * from t_contact where emails like '%" & emailvalue & "%'", conn_user, adOpenDynamic, adLockOptimistic, -1
Text2.Text = "select * from t_contact where emails like '%" & emailvalue & "%'"
If rs_contact.EOF Then
MsgBox "未检索到该邮件信息！"
ElseIf Not rs_contact.EOF Then
txtAccount_id.Text = rs_contact.Fields("account_id")
txtContactid.Text = rs_contact("id")
End If
rs_contact.Close
Set rs_contact = Nothing
数据库里明明可以手动查出数据，但txtAccount_id.txtContactid.Text 就是显示不出来，而且我把sql语句打印出来后，却是这样的：
select aa from bb where a1 like '%xxxxx
%'
稀里糊涂给换行了，麻烦给看看！~
Set rs_contact = New ADODB.Recordset
rs_contact.Open "select * from t_contact where emails like '%" & emailvalue & "%'", conn_user, adOpenDynamic, adLockOptimistic, -1
Text2.Text = "select * from t_contact where emails like '%" & emailvalue & "%'"
If rs_contact.EOF Then
MsgBox "未检索到该邮件信息！"
ElseIf Not rs_contact.EOF Then
txtAccount_id.Text = rs_contact.Fields("account_id")
txtContactid.Text = rs_contact("id")
End If
rs_contact.Close
Set rs_contact = Nothing
数据库里明明可以手动查出数据，但txtAccount_id.txtContactid.Text 就是显示不出来，而且我把sql语句打印出来后，却是这样的：
select aa from bb where a1 like '%xxxxx
%'
稀里糊涂给换行了，麻烦给看看！~
请对输入字符串进行格式化操作，因为有的时候您使用的条件字符串中也许会包含了sql无法接受的非法字符，例如换行符啊啥的，导致出错
可以对emailvalue这个参数先用trim()函数进行处理将前后部分空格去掉，然后用replace()函数将其中的换行代码全部去掉
处理后再使用处理后的值带入sql进行查询，具体换行符的ascii代码可以搜索下
Text2.Text 的multiline那个属性是不是给设置成true了！~
感觉不是sql的问题