asp 模糊搜索问题?

来源:百度知道 编辑:UC知道 时间:2024/05/30 03:23:04
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
If (Request.Form("aa") <> "") Then
Recordset1__MMColParam = Request.Form("aa")
End If
%>
<%
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = connstr
Recordset1.Source = "SELECT * FROM 表 WHERE 字段 LIKE '%" + Replace(Recordset1__MMColParam, "'", "''") + "%' ORDER BY id DESC"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1_numRows = 0
%>

请问怎样实现在提交的值中加入空格也不影响搜索的结果?就像百度一样?

Recordset1.Source = "SELECT * FROM 表 WHERE 字段 LIKE '%" + Replace(Replace(Recordset1__MMColParam, "'", "''")," ","") + "%' ORDER BY id DESC"

改为
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
If (Request.Form("aa") <> "") Then
Recordset1__MMColParam = trim(Request.Form("aa"))
End If
%>
<%
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = connstr
Recordset1.Source = "SELECT * FROM 表 WHERE 字段 LIKE '%" & Recordset1__MMColParam & "%' ORDER BY id DESC"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1_numRows = 0
%>