首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

SQL中select from where like 有关问题

2012-12-15 
SQL中selectfromwhere like 问题Private Sub cmdFind_Click()Dim sst As Stringsst InputBox$(输入部门

SQL中select from where like 问题
Private Sub cmdFind_Click()
Dim sst As String
sst = InputBox$("输入部门编号", "查询")
Adodc1.RecordSource = "select * from 部门表 where 部门编号like '% '&sst&'%'"
Adodc1.Refresh
If Adodc1.Recordset.RecordCount > 0 Then
   cmddel.Enabled = True
   Text2.Enabled = True
   Text1.Enabled = True
   i = 1
   Text1.Text = Adodc1.Recordset.Fields("部门编号").Value
   Text2.Text = Adodc1.Recordset.Fields("部门名称").Value
Else
   i = 0
End If
End Sub


知道是"select * from 部门表 where 部门编号like '% '&sst&'%'"有错误,但应该怎么改呢?
穷人,没多少分,抱歉


[最优解释]
Adodc1.RecordSource = "select * from 部门表 where 部门编号 like '%" & sst &"%'"

[其他解释]
Adodc1.RecordSource = "select * from 部门表 where 部门编号like '%" & sst & "%'"
[其他解释]
"select * from 部门表 where 部门编号like '%sst%'"

[其他解释]
http://download.csdn.net/detail/veron_04/1644211
[其他解释]
谢谢  ,问题解决了

热点排行