大家看小弟我这个WAP的ASP程序那里出有关问题了啊为什么实现不了模糊查询的啊
日期：2014-05-17 浏览次数：20916 次
大家看我这个WAP的ASP程序那里出问题了啊!为什么实现不了模糊查询的啊?
<%@LANGUAGE= "VBSCRIPT " CODEPAGE= "65001 "%>
<%response.buffer=true%>
<!--#include file= "conn.asp " -->
<% Response.ContentType= "text/vnd.wap.wml " %>
<?xml version= "1.0 " encoding= "utf-8 "?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN " "http://www.wapforum.org/DTD/wml_1.1.xml ">
<wml>
<head>
<meta http-equiv= 'Cache-Control ' content= 'no-cache '/>
<meta http-equiv= "Cache-Control " content= "max-age=0 "/>
</head>
<card title= "搜索程序 ">
<p> <img src= 'images/logo.gif ' alt= "搜索程序 "/> <br /> <br />
<%if request( "act ")= "yes " then
if request( "valuekey ")= " " then
response.write "搜索内容不能为空! "
response.write " <br /> <anchor> <prev/> 后退 </anchor> "
else
key=request( "valuekey ")
set rs=server.CreateObject( "adodb.recordset ")
sqlstr= "select * from data WHERE title Like '% "& key & "% ' order by date Desc "
rs.open sqlstr,conn,1,1
if rs.eof and rs.bof then
response.write "没有你要的资料 "
response.Write key
else
for i=1 to 10
response.Write rs( "title ")& " <br /> "
rs.movenext
next
end if
end if
else%>
类别： <select name= "classkey ">
<option value= "0 "> 所有类别 </option>
<option value= "1 "> 搜索铃声 </option>
<option value= "2 "> 搜索图片 </option>
<option value= "3 "> 搜索视频 </option>
<option value= "4 "> 搜索主题 </option>
<option value= "5 "> 搜索游戏 </option>
<option value= "6 "> 搜索软件 </option>
<option value= "7 "> 搜索小说 </option>
</select> <br/>
条件： <select name= "limitkey ">
<option value= "title "> 标 题 </option>
<option value= "class "> 分 类 </option>
<option value= "format "> 格 式 </option>
<option value= "size1 "> 机 型 </option>
<option value= "size1 "> 象 素 </option>
<%@LANGUAGE= "VBSCRIPT " CODEPAGE= "65001 "%>
<%response.buffer=true%>
<!--#include file= "conn.asp " -->
<% Response.ContentType= "text/vnd.wap.wml " %>
<?xml version= "1.0 " encoding= "utf-8 "?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN " "http://www.wapforum.org/DTD/wml_1.1.xml ">
<wml>
<head>
<meta http-equiv= 'Cache-Control ' content= 'no-cache '/>
<meta http-equiv= "Cache-Control " content= "max-age=0 "/>
</head>
<card title= "搜索程序 ">
<p> <img src= 'images/logo.gif ' alt= "搜索程序 "/> <br /> <br />
<%if request( "act ")= "yes " then
if request( "valuekey ")= " " then
response.write "搜索内容不能为空! "
response.write " <br /> <anchor> <prev/> 后退 </anchor> "
else
key=request( "valuekey ")
set rs=server.CreateObject( "adodb.recordset ")
sqlstr= "select * from data WHERE title Like '% "& key & "% ' order by date Desc "
rs.open sqlstr,conn,1,1
if rs.eof and rs.bof then
response.write "没有你要的资料 "
response.Write key
else
for i=1 to 10
response.Write rs( "title ")& " <br /> "
rs.movenext
next
end if
end if
else%>
类别： <select name= "classkey ">
<option value= "0 "> 所有类别 </option>
<option value= "1 "> 搜索铃声 </option>
<option value= "2 "> 搜索图片 </option>
<option value= "3 "> 搜索视频 </option>
<option value= "4 "> 搜索主题 </option>
<option value= "5 "> 搜索游戏 </option>
<option value= "6 "> 搜索软件 </option>
<option value= "7 "> 搜索小说 </option>
</select> <br/>
条件： <select name= "limitkey ">
<option value= "title "> 标 题 </option>
<option value= "class "> 分 类 </option>
<option value= "format "> 格 式 </option>
<option value= "size1 "> 机 型 </option>
<option value= "size1 "> 象 素 </option>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
