📄 wy_trip_findasp.asp
字号:
<!--#include file="../wy_trip_inc/wy_trip_cnn.inc"-->
<html>
<head>
<title>PTrip Server 2005 For 数据库课程设计
</title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../wy_trip_css/wy_trip.css">
</head>
<%
country=request.Form("classid")
city=request.Form("Nclassid")
money=request.Form("Mclassid")
keyword=request.Form("keyword")
qcountry=request.QueryString("country")
qcity=request.QueryString("city")
qmoney=request.QueryString("money")
if(country="" and city="" and money="")then
country=qcountry
city=qcity
money=qmoney
end if
country=trim(country)
city=trim(city)
money=trim(money)
' response.Write(country)
'response.Write(city)
'"500~2000" d>500元~2000元</option>
'<option value="2000~5000">2000元~5000元</option>
'<option value="5000~8000">5000元~8000元</option>
'<option value="8000~10000">
sqlstr1="nothing"
sqlstr2="nothing"
select case money
case "500~2000"
m1=500
m2=2000
case "2000~5000"
m1=2000
m2=5000
case "5000~8000"
m1=5000
m2=8000
case "8000~10000"
m1=8000
m2=10000
end select
if(city="")then
' country="" city="" money=""
if(keyword="关键字")then
sqlstr1="select * from trip_solhomelandinfor"
sqlstr2="select * from trip_soloverseasinfor"
else
sqlstr1="select * from trip_solhomelandinfor where solname like '%"&keyword&"%'"
sqlstr2="select * from trip_soloverseasinfor where solname like '%"&keyword&"%'"
end if
' country="" city="" money<>""
if(money<>"")then
if(keyword="关键字")then
sqlstr1="select * from trip_solhomelandinfor where solmoney>="&m1&" and solmoney<="&m2
sqlstr2="select * from trip_soloverseasinfor where solmoney>="&m1&" and solmoney<="&m2
else
sqlstr1="select * from trip_solhomelandinfor where solmoney>="&m1&" and solmoney<="&m2&" and solname like '%"&keyword&"%'"
sqlstr2="select * from trip_soloverseasinfor where solmoney>="&m1&" and solmoney<="&m2&" and solname like '&"&keyword&"%'"
end if
end if
else
' country="" city<>""
if(keyword="关键字")then
sqlstr1="select * from trip_solhomelandinfor where soladdress='"&city&"'"
sqlstr2="select * from trip_soloverseasinfor where soladdress='"&city&"'"
else
sqlstr1="select * from trip_solhomelandinfor where soladdress='"&city&"' and solname like '%"&keyword&"%'"
sqlstr2="select * from trip_soloverseasinfor where soladdress='"&city&"' and solname like '%"&keyword&"%'"
end if
' country="" city="" money<>""
if(money<>"")then
if(keyword="关键字")then
sqlstr1="select * from trip_solhomelandinfor where soladdress='"&city&"' and solmoney>="&m1&" and solmoney<="&m2
sqlstr2="select * from trip_soloverseasinfor where soladdress='"&city&"' and solmoney>="&m1&" and solmoney<="&m2
else
sqlstr1="select * from trip_solhomelandinfor where soladdress='"&city&"' and solmoney>="&m1&" and solmoney<="&m2&"' and solname like '%"&keyword&"%'"
sqlstr2="select * from trip_soloverseasinfor where soladdress='"&city&"' and solmoney>="&m1&" and solmoney<="&m2&"' and solname like '%"&keyword&"%'"
end if
end if
end if
select case country
case ""
showl=0
case "1"
showl=1
case "2"
show=2
end select
'if( country=1) then
' tablename="trip_solhomelandinfor"
'solad=0
' else
'tablename="trip_soloverseasinfor"
'solad=1
' end if
%>
<body leftmargin="0" topmargin="0" bottommargin="0" rightmargin="0" link="#3357B3" vlink="#3357B3" alink="#3357B3" bgcolor="#e8eefc">
<table width="750" height="716" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" class="Main">
<p class="NoBreakBeforeAfter"><img src="../wy_trip_images/TopCol3.gif" WIDTH="247" HEIGHT="23"></p>
<p class="NoBreakBeforeAfter"><img src="../wy_trip_images/HeaderOtherDestination.gif" width="229" height="28"></p>
<p class="Indented1" align="center"><font size="6" color="#3357b3"><b> 旅游解决方案查询</b></font></p>
<p class="Indented1" align="center"> </p>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<th colspan="2" scope="col">名称</th>
<th width="14%" scope="col">类型</th>
<th width="10%" scope="col">地点</th>
<th width="10%" scope="col">费用</th>
<th width="19%" scope="col">说明</th>
<th width="21%" scope="col">更新时间</th>
</tr>
<tr>
<td colspan="7"><hr color="#999999" width="100%"></td>
</tr>
<%
if(showl=0 or showl=1)then
sqlstr=sqlstr1
solad1=0
set rst=server.createobject("adodb.recordset")
rst.open sqlstr,conn,1,1
if not (rst.eof or rst.bof) then
do while(not rst.eof)
solid1=rst("id")
solname1=rst("solname")
soladdress1=rst("soladdress")
soltype1=rst("soltype")
solabode1=rst("solabode")
solmoney1=rst("solmoney")
solnote1=rst("solnote")
soltime1=rst("soltime")
%>
<tr onmouseover=this.style.backgroundColor="#cccccc";return onmouseout=this.style.backgroundColor=''; true;>
<td width="5%" ><div align="left"> </div></td>
<td width="21%" ><div align="left"> 国内： <%=solname1%></div></td>
<td><div align="center"><%=soltype1%></div></td>
<td><div align="center"><%=soladdress1%></div></td>
<td><div align="center"><%=solmoney1%></div></td>
<td><div align="center"><a href="wy_trip_findshow.asp?inforid=<%=solid1%>&inforkind=<%=solad1%>&solname=<%=solname1%>"><font color="#0000FF">详细内容</font></a></div></td>
<td><div align="center"><%=soltime1%></div></td>
</tr>
<tr>
<th colspan="2" scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
</tr>
<%
rst.movenext
loop
end if
rst.close
set rst=nothing
end if
%>
<tr>
<th colspan="2" scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
</tr>
<%
if(showl=0 or show=2)then
sqlstr=sqlstr2
solad2=1
set rst=server.createobject("adodb.recordset")
rst.open sqlstr,conn,1,1
if not (rst.eof or rst.bof) then
do while(not rst.eof)
solid2=rst("id")
solname2=rst("solname")
soladdress2=rst("soladdress")
soltype2=rst("soltype")
solabode2=rst("solabode")
solmoney2=rst("solmoney")
solnote2=rst("solnote")
soltime2=rst("soltime")
%>
<tr onmouseover=this.style.backgroundColor="#cccccc";return onmouseout=this.style.backgroundColor=''; true;>
<td><div align="left"></div></td>
<td> 国外： <%=solname2%></td>
<td><div align="center"><%=soltype2%></div></td>
<td><div align="center"><%=soladdress2%></div></td>
<td><div align="center"><%=solmoney2%></div></td>
<td><div align="center"><a href="wy_trip_findshow.asp?inforid=<%=solid2%>&inforkind=<%=solad2%>&solname=<%=solname2%>"><font color="#0000FF">详细内容</font></a></div></td>
<td><div align="center"><%=soltime2%></div></td>
</tr>
<tr>
<th colspan="2" scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
</tr>
<%
rst.movenext
loop
end if
rst.close
set rst=nothing
end if
%>
<tr>
<th colspan="2" scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
</tr>
<tr>
<th colspan="2" scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"><a href="wy_trip_find.asp">返回</a></th>
</tr>
</table>
<p> </p></td>
</tr>
<tr>
<td bgcolor="#e8eefc"> </td>
</tr>
<tr>
<td bgcolor="#e8eefc"> </td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -