日期:2014-05-16  浏览次数:20937 次

请高手帮忙修改一下站内搜索代码,感谢!
请高手帮忙修改一下ASP站内搜索代码,将以下代码修改成可搜索多关键词的代码,如:关键词空格关键词,或者关键词空格关键词空格关键词。小弟感谢之致!
      <form id="form1" name="form1" method="post" action="search.asp">
        <tr>
          <td>
            <div align="center">
              <input name="key" type="text" size="50" />
              <select name="t" id="t">
                <option value="0">型号</option>
                <option value="1">品名</option>
              </select>
              <input type="submit" name="button" id="button" value="搜索" />
              </div>
</td>
        </tr> </form>

<%
t=Trim(Request.Form("t"))
key=Trim(Request.Form("key"))
if t="" or key="" then
Response.Write("<script>alert('请输入关键词!');history.back();</script>")
Response.End()
end if
if t=1 then
set rs=conn.execute("select * from [shop] where title like '%"&key&"%' order by id desc")
else
set rs=conn.execute("select * from [news] where title like '%"&key&"%' order by id desc")
end if
if t=1 then
%>
------解决方案--------------------
前面的不动,后面的改成
<%
t=Trim(Request.Form("t"))
key=Trim(Request.Form("key"))

if t="" or key="" then
 Response.Write("<script>alert('请输入关键词!');history.back();</script>")
 Response.End()
end if

if t=1 then
 sql="select * from [shop] where 1=1"
else
 sql="select * from [news] where 1=1"
end if

keyArr=split(key," ")
for i=0 to ubound(keyArr)
    sql=sql&" or title like '%"&keyArr(i)&"%'"
next

set rs=conn.execute(sql)

if t=1 then
%>