📄 usermanage.asp
字号:
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=../style.css rel=STYLESHEET type=text/css>
</head>
<script>
function user(id) { window.open("viewuser.asp?user_id="+id,"","height=400,width=600,left=190,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");}
</script>
<%
if session("admin_name")="" then response.end
set rs=server.createobject("adodb.recordset")
%>
<!--#include file="conn.asp"-->
<table border="0" width="100%" cellspacing="1">
<tr>
<td width=16%>用户id号</td>
<td width=16%>用户名</td>
<td width=16%>E-mail</td>
<td width=16%>邮政编码</td>
<td width=17%>注册时间</td>
<td width=17%>查看详细信息</td>
<tr>
<%
page=request.querystring("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
sql="select * from users order by user_id DESC"
rs.open sql,conn,3,3
if rs.eof then
%>
<td width=760 colspan="6">暂且没有任何用户注册</td></tr>
<%else
rs.pagesize=20
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
rs.cachesize=rs.pagesize
i=0
dim user_id(),user_name(),user_mail(),user_postcode(),user_regtime()
do while not rs.eof and (i<rs.pagesize)
i=i+1
redim preserve user_id(i),user_name(i),user_mail(i),user_postcode(i),user_regtime(i)
user_id(i)=rs("user_id")
user_name(i)=rs("user_name")
user_mail(i)=rs("user_mail")
user_postcode(i)=rs("user_postcode")
user_regtime(i)=rs("user_regtime")
rs.movenext
loop
rs.close
for i=1 to ubound(user_id)
%>
<tr>
<td width=16%><%=user_id(i)%></td>
<td width=16%><%=user_name(i)%></td>
<td width=16%><%=user_mail(i)%></td>
<td width=16%><%=user_postcode(i)%></td>
<td width=17%><%=user_regtime(i)%></td>
<td width=17%><a href=javascript:user(<%=user_id(i)%>)>查看详细信息</a></td>
</tr>
<%next
%>
<tr>
<td width=248 colspan="2">
<p align="left">共<font color=red><%=totalpage%></font>页 第<%=page%>页
<font color=666666><%if page-1>0 then%><a href="usermanage.asp?page=<%=page-1%>">上一页</a><%else%><font color=666666>上一页</font><%end if%> <%if page+1<=totalpage then%><a href="usermanage.asp?page=<%=page+1%>">下一页</a><%else%><font color=666666>下一页</font><%end if%></font></p>
</td>
</tr>
</table>
<%end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -