search.asp

很好的

<!--===============================================================-->
<!--Mfkiqpl旅行社旅游线路预订程序源代码仅供学习或部分旅行社网站用---->
<!--任何单位或个人不得随意修改、截取其中代码或做不法用途------------->
<!--版权归属:mfkiqpl   http://www.zjjnet.com 所有-------------------->
<!--请务必保留以下版权信息------------------------------------------->
<!--作者:mfkiqpl----------------------------------------------------->
<!--QQ:31827726 mail:[e-mail]--------------------------------->
<!--主页地址:http://www.zjjnet.com----------------------------------->
<!----------------欢迎各位站长与本人小站进行友情链接----------------->
<!--===============================================================-->
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script>
function scolor(dd){dd.style.backgroundColor='#ffffff';}
function rcolor(tt){tt.style.backgroundColor='';}
function check(){if(form1.address.value==''){alert("您要去的地方必须填写！");return false;}}
</script>
<%
pagestart
dim action
action=trim(request("action"))
response.write("<table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0"">")
response.write("<tr><td width=""30"" height=""22"" align=""center"" bgcolor="&c3&"><img src=images/mfk31.gif></td>")
response.write("<td width=""725"" bgcolor="&c3&">线路搜索(让您根据自己出行方案来查找合适的线路)</td></tr></table>")
response.write("<table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0""><tr>")
response.write("<td height=""4""></td></tr></table>")
response.write("<table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""1"" bgcolor="&c1&">")
response.write("<form action=""?action=go"" method=""post"" name=""form1"" onsubmit='return check();'>")
response.write("<tr bgcolor="&c3&">")
response.write("<td width=""125"" height=""30"" align=""center"">您要去的地方：</td>")
response.write("<td width=""250"" height=""30"" bgcolor="&c4&">　")
response.write("<input name=""address"" type=""text"" id=""address"" title='只需填写一个地名' onmouseover='this.focus();' size=""20"">")
response.write("    *必填</td>")
response.write("<td width=""125"" height=""30"" align=""center"">您想出行几天？：</td>")
response.write("<td width=""255"" height=""30"" bgcolor="&c4&">　")
response.write("<select name=""shijian"" id=""shijian"" onmouseover=""this.focus();"">")
response.write("<option value=""三"">三 天</option>")
response.write("<option value=""四"">四 天</option>")
response.write("<option value=""五"">五 天</option>")
response.write("<option value=""六"">六 天</option>")
response.write("<option value=""七"">七 天</option>")
response.write("<option value=""八"">八 天</option>")
response.write("<option value=""九"">九 天</option>")
response.write("<option value=""十"">十 天</option>")
response.write("</select></td>")
response.write("</tr><tr bgcolor="&c3&">")
response.write("<td height=""30"" align=""center"">您想游览的景点：</td>")
response.write("    <td height=""30"" colspan=""3"" bgcolor="&c4&">")
response.write("　<input name=""jingdian"" type=""text"" id=""jingdian"" title='填写一个景点既可' onmouseover='this.focus();' size=""30"">　")
response.write("    搜索技巧：不改变搜索模式，填写任意一项就可以搜索。</td>")
response.write("  </tr>")
response.write("  <tr bgcolor="&c4&">")
response.write("    <td height=""30"" colspan=""2"" align=""center"">模糊查询：")
response.write("      <input name=""searchmode"" type=""radio"" value=""mf"" checked title='包含所要查找的内容'>      　　")
response.write("      精确查询：")
response.write("<input name=""searchmode"" type=""radio"" value=""jq"" title='完全与要查找的内容相符'>        </td>")
response.write("<td height=""30"" colspan=""2"" align=""center""><input type=""submit"" name=""Submit"" value=""开 始 搜 索"" title='开始搜索<br><br>无特殊情况无须改变搜索模式'></td>")
response.write("</tr></form></table>")
response.write("<table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0"">")
response.write("<tr><td height=""4""></td></tr></table>")
if action="go" then
mfk
end if
sub mfk
dim address,shijian,jingdian,searchmode,oneorall
address=trim(request("address"))
shijian=request("shijian")
jingdian=trim(request("jingdian"))
searchmode=request("searchmode")
if searchmode="mf" then
if jingdian="" then
sql="select id,x_name,x_leixun,x_shijian,x_baojia,x_jingdian from xianlu where x_shijian like '%"&shijian&"%' and x_name like '%"&address&"%'"
else
sql="select id,x_name,x_leixun,x_shijian,x_baojia,x_jingdian from xianlu where x_shijian like '%"&shijian&"%' or x_name like '%"&address&"%' or x_jingdian like '%"&jingdian&"%'"
end if
end if
if searchmode="jq" then
sql="select id,x_name,x_leixun,x_shijian,x_baojia,x_jingdian from xianlu where x_shijian = '"&shijian&"' and x_name = '"&address&"' and x_jingdian = '"&jingdian&"'"
end if
set rs=conn.execute (sql)
response.write("<table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0"">")
response.write("<tr><td width=""30"" height=""22"" align=""center"" bgcolor="&c3&"><img src=images/mfk32.gif></td>")
response.write("<td width=""725"" bgcolor="&c3&">搜索结果(此次搜索："&jingdian&"　　"&shijian&"天　　"&address&")</td>")
response.write("</tr></table>")
response.write("<table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0"">")
response.write("<tr><td width=""772"" height=""4""></td></tr></table>")
response.write("<table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""1"" bgcolor="&c3&">")
response.write("<tr bgcolor="&c4&">")
response.write("<td width=""354"" height=""22"" align=""center"">线 路 名 称(点击查看详细信息)</td>")
response.write("<td width=""110"" align=""center"">类　型</td>")
response.write("<td width=""121"" align=""center"">价　格</td>")
response.write("<td width=""120"" align=""center"">时　间</td>")
response.write("<td width=""50"" align=""center"">预订</td></tr>")
while not rs.eof
response.write("<tr bgcolor="&c4&" onmouseover='scolor(this);' onmouseout='rcolor(this);'>")
response.write("<td height=""22""><img src=images/mfk5.gif><a href=""listxianlu.asp?id="&rs("id")&""" title='详细信息'>"&rs("x_name")&"</a></td>")
response.write("<td align=""center"">"&rs("x_leixun")&"</td>")
response.write("<td align=""center"">"&rs("x_baojia")&"</td>")
response.write("<td align=""center"">"&rs("x_shijian")&"</td>")
response.write("<td align=""center""><a href=""giveme.asp?id="&rs("id")&"""><img src=images/mfk7.gif alt=""快速预订"" border=""0""></a></td></tr>")
rs.movenext
wend
closers(rs)
response.write("</table><table width=""755"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0"">")
response.write("<tr><td width=""772"" height=""4""></td></tr></table>")
end sub
pageend
%>