查询的问题?

xpfoo2009 2009-04-07 11:03:41
高手看一下这个问题:
每次提示frm_jiqiku.Adodc1.RecordSource = "select * from jiqiku where frm_jq." & listbox1.Text & " = + '%" & Text1.Text + "'+'%'"
这一句有问题。我觉得在frm_jq." & listbox1.Text & " = + '%" & Text1.Text + "'+'%'"上问题大。因为我不知道这些格式是怎么设置的?
Private Sub Command1_Click()
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cnn.Open "Provider=SQLOLEDB.1;Password=h2f3n5j2;Persist Security Info=True;User ID=cn71197;Initial Catalog=cn71197_db;Data Source=121.198.155.231"
If Text1.Text = "" Then
MsgBox "请重新输入查询条件 !", vbExclamation, "提示信息"
Text1 = ""
Exit Sub
Else
frm_jiqiku.Adodc1.RecordSource = "select * from jiqiku where frm_jq." & listbox1.Text & " = + '%" & Text1.Text + "'+'%'"
Adodc1.Refresh
End If
End Sub
...全文
65 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
abc_2004 2009-04-07
  • 打赏
  • 举报
回复
frm_jiqiku.Adodc1.RecordSource = "select * from [jiqiku] where (frm_jq." & listbox1.Text & " like '%" & Text1.Text & "%'")
xpfoo2009 2009-04-07
  • 打赏
  • 举报
回复
都试过,还是错误提示
能解释一下% +等的意思吗?
jhone99 2009-04-07
  • 打赏
  • 举报
回复
frm_jiqiku.Adodc1.RecordSource = "select * from jiqiku where frm_jq." & listbox1.Text & " like '%" & Text1.Text & "%'"
jhone99 2009-04-07
  • 打赏
  • 举报
回复
frm_jiqiku.Adodc1.RecordSource = "select * from jiqiku where frm_jq." & listbox1.Text & " like '%" & Text1.Text + "%'"

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧