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

📄 kehu.asp

📁 GIS系统初期,目前孩子啊处于测试阶段,好奇的朋友可以看看.
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="session.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
paixu=request("paixu")
if paixu="" then
 paixu=0
 end if
 
if paixu=1 then
sql="select * from address_book Order by person_sn"
elseif paixu=2 then
sql="select * from address_book Order by full_name"
elseif paixu=3 then
sql="select * from address_book Order by mobile_tel"

else
sql="select * from address_book Order by person_sn"
end if

	rs.open sql,conn,1,1
		if rs.bof and rs.eof then
		response.Write("<center><font size=2>找不到你要查找的信息! 试试别的关键词吧!<br><a href='javascript:history.back()'>点此返回</a></font></center>")
		else
		
		page=request.QueryString("page")
		rs.pagesize=10 '每页显示个数
		total=rs.recordcount
		if Not IsEmpty(trim(Request("Page"))) then 
 page = CInt(Request("page"))    
    if page > rs.PageCount then 
        rs.AbsolutePage = rs.PageCount        
    elseif page <= 0 then 
        page = 1 
    else
        rs.AbsolutePage = page 
    end if
End if
page = rs.AbsolutePage%>
<HTML><HEAD><title>SMS-GIS管理系统</title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-color: #EEEEEE;
}
-->
</style>
</head>
<body>
<!--#include file="top.asp"-->
<table width="780" height="0" border="0" cellpadding="0" cellspacing="0" align=center>
  <tr>
    <td align="center" valign="top" bgcolor="#F9F9F9">
    <table width="780" height="37" border="0" cellpadding="0" cellspacing="1" bgcolor="#EEEEEE">
      <tr align="center">
        <td width="33" height="30">
		<a title="点击即可按此排序!!" href="kehu.asp?paixu=1">
		<span style="font-size: 9pt; text-decoration: none">序号</span></a></td>
        <td width="50"><span style="font-size: 9pt">姓 名</span></td>
        <td width="80"><span style="font-size: 9pt">生 日</span></td>
        <td width="101"><span style="font-size: 9pt">移动电话</span></td>
        <td width="84"><span style="font-size: 9pt">公司电话</span></td>
        <td width="79"><span style="font-size: 9pt">传 真</span></td>
        <td width="146"><span style="font-size: 9pt">公司名称</span></td>
        <td width="139"><span style="font-size: 9pt">公司网页</span></td>
        <td width="57"><span style="font-size: 9pt">选项</span></td>
      </tr><% 
For i = 1 to rs.PageSize
 if rs.EOF then
  Exit For 
 end if 
%>
      <tr align="center">
        <td width="33" bgcolor="#FFFFFF" height="35">
		<span style="font-size: 9pt"><%=rs("person_sn")%></span></td>
        <td width="50" bgcolor="#FFFFFF"><span style="font-size: 9pt"><%=rs("full_name")%></span></td>
        <td width="80" bgcolor="#FFFFFF"><span style="font-size: 9pt"><%=rs("birthday")%></span></td>
        <td width="101" bgcolor="#FFFFFF"><span style="font-size: 9pt"><%=rs("mobile_tel")%></span></td>
        <td width="84" bgcolor="#FFFFFF"><span style="font-size: 9pt"><%=rs("business_tel")%></span></td>
        <td width="79" bgcolor="#FFFFFF"><span style="font-size: 9pt"><%=rs("business_fax")%></span></td>
        <td width="146" bgcolor="#FFFFFF"><span style="font-size: 9pt"><%=rs("company")%></span></td>
        <td width="139" bgcolor="#FFFFFF"><span style="font-size: 9pt"><%=rs("corp_web")%></span></td>
        <td width="57" bgcolor="#FFFFFF"><font color="#FF3300">
		<a href="edi.asp?person_sn=<%=rs("person_sn")%>"><span style="text-decoration: none">
		<font color="#3131CE"><span style="font-size: 9pt">编辑</span></font></span></a><span style="font-size: 9pt">
		</span> 
		</font><a href="del_kehu.asp?person_sn=<%=rs("person_sn")%>">
		<font color="#FF3300"><span style="font-size: 9pt">删除</span></font></a></td>
      </tr>
	  <%
		  rs.movenext
		  next%>
    </table>
      <div align="center">
      <table width="780" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="30" align="center"><span style="font-size: 9pt"><%if rs.pagecount<>1 and rs.pagecount<>0 then%>
 			<%if page<rs.pagecount then%>
  <%if page=1 then %>
   [首页] [上一页]
  <%else%>
   [<a Href="kehu.asp?page=<%=1%>&paixu=<%=paixu%>">首页</a>]
   [<a Href="kehu.asp?page=<% =page-1 %>&paixu=<%=paixu%>">上一页</a>]
  <% end if %>
  [<a Href="kehu.asp?page=<%=page+1%>&paixu=<%=paixu%>">下一页</a>] 
  [<a Href="kehu.asp?page=<%=rs.PageCount%>&paixu=<%=paixu%>">尾页</a>]
 <%else%>
 [<a Href="kehu.asp?page=<% = 1%>&paixu=<%=paixu%>">首页</a>]
 [<a Href="kehu.asp?page=<% =page -1 %>&paixu=<%=paixu%>">上一页</a>]
 [下一页] [尾页]
 <%end if %>
<%else%>
[首页] [上一页] [下一页] [尾页]
<%end if%>[页次:<font color=red><b><%=page%></b></font>/<%=rs.PageCount%>]
[共<font color=red><b><%=rs.RecordCount%></b></font>条信息 <font color=red><b><%=rs.PageSize%></b></font>条/页]
			</span>
</td>
        </tr>
      </table></div>
	<span style="font-size: 9pt">
	<%end if
	  rs.close
	  set rs=nothing
	  conn.close
	  set conn=nothing%></span></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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