⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 qmadmin_search_list.asp

📁 一个公交查询系统 sql版本的 本来是给别人论文用的 结果发现自己不会写论文
💻 ASP
字号:
<!-- #include file="../inc/config.asp" -->
<!-- #include file="Login_Check.asp" -->
<html>
<LINK href="../css/admin.css" type=text/css rel=stylesheet>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>公交车线路列表</title>
</head>
<body>
<p>&nbsp;</p>
<div style="height:26px; padding-left:17px; font-size:14px; color:#314D98;">线路搜索:<input type="text" name="qmroute_name">&nbsp;<input type="button" value="搜索" class="class6" onClick="javascript:location.href='qmadmin_Search_List.asp?qmroute_name='+qmroute_name.value"></div>
<%
qmroute_name1=request.QueryString("qmroute_name")
%>
<table cellspacing="0" width="96%" align="center">
  <tr>
    <td width="5%" id="td2">ID</td>
    <td width="10%" id="td1">线路号</td>
    <td width="55%" id="td1">经过的站点</td>
    <td width="15%" id="td1">添加/修改时间</td>
    <td width="15%" id="td3">操作</td>
  </tr>
<%
set rst=conn.execute("select COUNT(*) as qmroute_count1 From [Route] where qmroute_name like '%"& qmroute_name1 &"%'")
    qmroute_count1=rst("qmroute_count1")  '统计[Message]中留言总数
	rst.close
sqlstr="select * from [Route] where qmroute_name like '%"& qmroute_name1 &"%'"
rs.open sqlstr,conn,1,3 
if not rs.eof then
	rs.pagesize=12
	page_num=qmroute_count1/12
	page_now=1
if trim(request.QueryString("page"))<>"" then
	page_now=trim(request.QueryString("page"))
	call CheckNum(page_now)
end if
if page_now>rs.pagecount or page_now<0 then
	page_now=1
end if
rs.absolutepage=page_now
	i=1
while (not rs.eof) and i<13
%>
  <tr>
    <td id="td5"><%=rs("qmroute_id")%></td>
    <td id="td4"><%=rs("qmroute_name")%></td>
    <td id="td8">
	  <div style="width:380px; text-align:left; padding-left:6px; overflow:hidden; text-overflow:ellipsis">
	   <nobr><%=rs("qmroute_address")%></nobr></div>
	</td>
    <td id="td4"><%=rs("qmroute_addupdate")%></td>
    <td id="td6"><a href="qmadmin_qmroute_Edit.asp?qmroute_id=<%=rs("qmroute_id")%>">编辑</a>|<a href="#"onclick="javascript:if (confirm('确认删除&nbsp;<%=rs("qmroute_name")%>?')) href='delete.asp?n=2&amp;id=<%=rs("qmroute_id")%>';else return;">删除</a>|<a href="qmadmin_qmroute_Add.asp">添加</a></td>
  </tr>
<%
rs.movenext
i=i+1
wend
%>
<form name="form1" action="" method="post">
  <tr valign="bottom">
   <td colspan="7" id="td7"><br>
   当前第<%=page_now%>页
  <%if page_now=1 then%>首页
  <%else%>
  <a href="qmadmin_Search_List.asp?qmroute_name=<%=qmroute_name1%>&amp;page=1">首页</a>
  <%end if%>
  <%if page_now>1 and rs.pagecount>1 then%>
  <a href="qmadmin_Search_List.asp?qmroute_name=<%=qmroute_name1%>&amp;page=<%=page_now-1%>">上一页</a>
  <%else%>上一页
  <%end if%>
  <%if page_now<rs.pagecount then%>
  <a href="qmadmin_Search_List.asp?qmroute_name=<%=qmroute_name1%>&amp;page=<%=page_now+1%>">下一页</a>
  <%else%>下一页
  <%end if%>
  <%if page_now<>rs.pagecount then%>
  <a href="qmadmin_Search_List.asp?qmroute_name=<%=qmroute_name1%>&amp;page=<%=rs.pagecount%>">尾页</a>
  <%else%>尾页
  <%end if%>
  共<%=rs.pagecount%>页/<%=qmroute_count1%>条
  转到:
  <input name="Num" type="text" size="2">&nbsp;页
  <input type="button" value="GO" class="class6" onClick="javascript:location.href='qmadmin_Search_List.asp?qmroute_name=<%=qmroute_name1%>&amp;page='+Num.value">
<br><br></td>
  </tr>
</form>
  <%else%>
  <tr>
    <td colspan="9" id="td7">
      未搜索到相关信息!
    </td>
  </tr>
<%
end if
rs.close
%>
</table>
<p></p>
<p></p></body>
</html>




⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -