加通配符
比如
Like '' & [值] & ''
补充:比如你是通过窗体上的文本框之类的来赋值作查询条件的。
条件可设在查询中,比如LIKE IIF(ISNULL([Forms]![窗体名]![文本框名]),"",''&[Forms]![窗体名]![文本框]&'')
可以用如下SQL语句
select from news where title like '%45%' order by id desc
这就是模糊查询语句,实际用时,用你输入的关键词替换45就行了,但要过滤下单引号
<%
keyw=replace(trim(request("keyw")),"'","")
set rs=connexecute("select from news where title like '%"&keyw&"%' order by id desc")
' 显示结果代码
%>
"SELECT
FROM
[TABLE]
WHERE
[日期和时间]
Like
'2007'";
应改为
"SELECT
FROM
[TABLE]
WHERE
[日期和时间]
Like
'2007%'";
注意,由于你用的是oledb驱动程序,在这里
不能用“”,必须用“%”。如果你用的是DAO访问Access数据库,则必须用“”。
祝你好运!
Public cn As New ADODBConnection
Public rs As New ADODBRecordset
Dim SQL as string
------------------------------
Private Sub Form_Load()
cnConnectionString = "provider=MicrosoftjetOLEDB40;" & _
"Persist security info= False; Data source=" & AppPath & "\datamdb"
cnOpen
rsCursorLocation = adUseClient
End Sub
Private Sub Command1_Click()
If rsState = adStateOpen Then rsClose
SQL = "select from book where 姓名 Like '%" & text10Text & "%'"
rsOpen SQL, cn, adOpenKeyset, adLockPessimistic
If rsRecordCount = 0 Then
MsgBox "No record to be found", vbInformation + vbOKOnly
Else
text1text=rsFields("姓名")
text2text=rsFields("ID")
text3text=rsFields("公司")
text4text=rsFields("职务")
text5text=rsFields("手机")
text6text=rsFields("电话")
text7text=rsFields("地址")
text8text=rsFields("备注")
text9text=rsFields("传真")
End If
End Sub
以上就是关于请问高手:如何实现ACCESS数据库的模糊查询即:键入第一个字即可查询到与之相关的全部记录.全部的内容,包括:请问高手:如何实现ACCESS数据库的模糊查询即:键入第一个字即可查询到与之相关的全部记录.、access2007如何完成模糊查询、C# Access 模糊查询SQL语句等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)