📄 linesearchrlt.asp
字号:
<!--#include file="admin/conndb.asp"-->
<html>
<head>
<title>旅游线路查询结果</title>
<link href="style.css" rel="stylesheet">
</head>
<body>
<form name="form1" method="POST">
<%
Dim SearchCnd
SearchCnd = ""
lname = Request("name")
area = Request("area")
days = Request("days")
If lname<>"" And area<>"" Then
'表示选择线路
SearchCnd = " l.LineName Like '%"&lname&"%' And a.AreaName Like '%"&area&"%'"
ElseIf lname<>"" And area="" Then
SearchCnd = " l.LineName Like '%"&lname&"%'"
ElseIf lname="" And area<>"" Then
SearchCnd = " a.AreaName Like '%"&area&"%'"
End If
If days<>"" And SearchCnd="" Then
SearchCnd = " l.Days="&Cint(days)
ElseIf days<>"" And SearchCnd<>"" Then
SearchCnd = SearchCnd&" And l.Days="&Cint(days)
ElseIf days="" And SearchCnd<>"" Then
SearchCnd = SearchCnd
End If
'Response.Write searchcnd
Dim rs
Set rs = Server.CreateObject("ADODB.RecordSet")
If SearchCnd="" Then
sql = "Select l.*,a.TypeId,a.AreaName From Line l,Area a Where l.AreaId=a.AreaId Order By l.LineId Desc"
Else
sql = "Select l.*,a.TypeId,a.AreaName From Line l,Area a Where l.AreaId=a.AreaId And "&SearchCnd&" Order By l.LineId Desc"
End If
'Response.Write sql
rs.Open sql,Conn,1,1
%>
<p align=center><font color="#000080"><b><font color="#990000" style="font-size: 12pt">旅游线路查询结果</font></b></font></p>
<table align=center border="1" cellspacing="0" width="100%" bordercolorlight="#FFE8DD" bordercolordark="#FFFFFF">
<tr>
<td width="20%" align="center" bgcolor="#FFE8DD"><strong>地域</strong></td>
<td width="40%" align="center" bgcolor="#FFE8DD"><strong>线路名称</strong></td>
<td width="10%" align="center" bgcolor="#FFE8DD"><strong>行程天数</strong></td>
<td width="30%" align="center" bgcolor="#FFE8DD"><strong>适合人群</strong></td>
</tr>
<%
Do While Not rs.Eof
%>
<tr>
<td align="center"><%If rs("TypeId")=1 Then%>本市<%Else%>外埠<%End If%>--<%=rs("AreaName")%></td>
<td><a href="/travel/LineView.asp?lid=<%=rs("LineId")%>" target="_blank">
<%=rs("LineName")%></a></td>
<td align="center"><%=rs("Days")%></td>
<td align="center"><%=rs("People")%></td>
</tr>
<%
rs.MoveNext()
Loop
rs.Close
%>
</table>
<p align="center"><a href="javascript:window.close();">[ 关 闭 ]</a></p>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -