📄 resaulta.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!-- #include file="conn.asp" -->
<%
dim fs,sql,rs,i,page,rowcount,ls
fs=request("fs")
ls=request("ls")
if fs="" then
response.Redirect("find.asp")
end if
if fs<>"" then
fs=ReplaceBadChar(fs)
ls=ReplaceBadChar(ls)
end if
page=request("page")
if isempty(page) then
page=1
end if
sql="select ID,linenum,ftime,ltime,kongtiao,yuepiao from content where station LIKE '%%" & fs & "%%" & ls & "%%'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.RecordCount<1 then
response.write "对不起！数据库中暂时未收录您所查找的信息。"
response.write "<a href='findmsds.asp'>返回查询页面...</a>"
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="sty.css" rel="stylesheet" type="text/css">
<script language="Javascript">
<!--
function opens(Id)
{
surl="cnshow.asp?Id=" + Id;
window.open(surl,"","width=535,height=225,location=0,menubar=0,toolbar=0,scrollbars=1,resizable=yes");
}
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
<style type="text/css">
<!--
a:link {
color: #0000FF;
text-decoration: none;
}
a:visited {
text-decoration: none;
color: #B5B5FF;
}
a:hover {
text-decoration: none;
color: #FF9966;
}
a:active {
text-decoration: none;
color: #636563;
}
.style6 {font-size: 12px}
-->
</style></head>
<body bottommargin="0" leftmargin="0" rightmargin="0" topmargin="0">
<table width="760" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#999999" style="font-size:12px ">
<tr bgcolor="#FAFAFA">
<td width="6%"><div align="center"><span class="ddCopy"> </span>序号</div></td>
<td width="28%" height="20"><div align="left"><span class="ddCopy"> </span>车次</div></td>
<td width="37%"><div align="left"><span class="ddCopy"> </span>首末车时间</div></td>
<td width="7%"><div align="center">空调</div></td>
<td width="9%"><div align="center">月票</div></td>
<td width="13%"><div align="center">详细信息</div></td>
</tr>
<%
i=1
rs.pagesize=200
if request("page")<>"" then
rs.absolutepage=request("page")
else
rs.absolutepage=1
end if
rowcount=rs.pagesize
if rs.recordcount=0 then
response.write "没有你要查找的文档。"
response.end
else
do while not rs.eof and rowcount>0 %>
<tr bgcolor="#FAFAFA">
<td width="6%" height="20" class="ddCopy">
<div align="center">
<% =i%>
</div></td>
<td width="28%" height="25" class="dd">
<span class="ddCopy"></span>
<% =rs(1)%> </td>
<td width="37%" height="20" class="dd">
<span class="ddCopy"> </span>
<% =rs(2)%> </a> -
<% =rs(3)%></td>
<td width="7%" height="20" class="dd"><div align="center">
<% =rs(4)%>
</a> </div></td>
<td width="9%" height="20" class="dd">
<div align="center">
<% =rs(5)%>
</a> </div></td>
<td width="13%" height="20" class="dd"><div align="center"><a href='JavaScript:opens(<% =rs(0)%>)' >查看</a></div></td>
</tr>
<% rs.movenext
rowcount=rowcount-1
i=i+1
loop
end if %>
</table>
<table width="498" height="25" border="0" align="center">
<tr>
<td width="492"><div align="center" class="style6">北京便民信息网 www.100001.cn </div></td>
</tr>
</table>
<p> </p>
</body>
</html>
<%
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -