📄 adduser.asp
字号:
<!--#include file="conn.asp"--><!--#include file="admin_is.ini"-->
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css">
<table width="80%" border="1" cellspacing="0" cellpadding="1" bordercolor="#336699" align="center" height="117">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="../images/back_3.gif" rowspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
<tr>
<td class="12v" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="96" width="100%">
<tr>
<td>
<table width="100%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#FFFFFF" height="74">
<tr>
<td height="20" bgcolor="#FFFFFF">
<div align="center"><font color="#000000">用户管理</font></div>
</td>
</tr>
<tr>
<td height="2" valign="top" bgcolor="#E8F1FF"> <br>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="88">
<tr>
<td height="43" width="7%">
<div align="center">ID</div>
</td>
<td height="43" width="9%">名称</td>
<td height="43" width="9%">密码</td>
<td height="43" width="20%">地址</td>
<td height="43" width="11%">电话</td>
<td height="43" width="7%">代理</td>
<td height="43" width="8%">现金</td>
<td height="43" width="10%">OICQ</td>
<td height="43" width="10%">EMAIL</td>
<td height="43" width="9%">生日</td>
</tr>
<% set rs=server.createobject("adodb.recordset")
sql="SELECT * from use order by time desc"
rs.open sql,conn,1,3
page=1 ' 设置变量PAGE=1
rs.pagesize=20
if Not IsEmpty(Request("Page")) then '如果PAGE已经初始化...
Page = CInt(Request("Page")) '接收PAGE并化为数字型赋给PAGE变量
if Page > rs.PageCount then '如果接收的页数大于总页数
rs.AbsolutePage = rs.PageCount '设置当前显示页等于最后页
else
rs.AbsolutePage = Page '显示当前页等于接收的页数
end if
else
Page = 1 '如果page未被初始化则设为1
End if
rs.AbsolutePage=page
%>
<%
For i = 1 to rs.PageSize
if rs.EOF then
Exit For
end if '利用for next 循环依次读出记录
%>
<tr>
<td width="7%">
<div align="center"><%=rs("id")%><img src="images/delete.gif" alt="删除" width="12" height="12" border="0" onClick="if(confirm('您确定要删除吗?')){location='deluse.asp?id=<%=rs("id")%>'}else{return(false)}" onMouseMove="this.style.cursor='hand'"></div>
</td>
<td width="9%"><a href="addusernew.asp?id=<%=rs("id")%>"><%=rs("name")%></a></td>
<td width="9%"><%=rs("pass")%></td>
<td width="20%"><%=rs("dizhi")%></td>
<td width="11%"><%=rs("dianhua")%></td>
<td width="7%"><%=rs("daili")%></td>
<td width="8%"><%=rs("cun")%></td>
<td width="10%"><%=rs("oicq")%></td>
<td width="10%"><%=rs("email")%></td>
<td width="9%"><%=rs("shengri")%></td>
</tr>
<% rs.movenext
next %>
</table>
</td>
</tr>
<tr>
<td height="2" valign="top" bgcolor="#E8F1FF"><div align="right"><br>
<%if request("page")>1 then%>
<a Href="adduser.asp?Page=<% = 1%>">首页</a> <a Href="adduser.asp?Page=<% =request("page") -1 %>">上一页</a>
<%end if %>
<%if request("page")<>rs.pagecount then %>
<a Href="adduser.asp?Page=<% =request("page") + 1%>">下一页</a>
<a Href="adduser.asp?Page=<% = rs.PageCount%>">尾页</a>
<% end if %>
</div></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -