📄 admin_user_list.asp
字号:
<!--#include file="../Conn.asp"-->
<!--#include file="../Include/Md6.asp"-->
<%
If Session("AdminUserName") = "" Then
Response.Write "<script>window.open('Login.asp','_parent');</script>"
Response.End
End If
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(server_v1,8,len(server_v2))<>server_v2 then
response.write "<script>alert('警告！你正在从外部提交数据！！请立即终止！！');location.href='../index.htm';</script>"
Response.End
end If
if request("submit")=" 删除选定用户 " Then
id=replace(request("selAnnounk")," ","")
id=split(id,",")
For i=0 to UBound(id)
Conn.Execute "delete * from [user] where id=" & id(i)
Next
Response.Write "<script>location.href='admin_user_list.asp';parent.document.getElementById('contents').src='admin_left.asp?time=" & Now() & "';</script>"
Response.End
End If
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>后台管理</title>
<link href="../images/text.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
margin-top: 0px;
margin-bottom: 0px;
}
-->
</style>
<SCRIPT language=javascript>
function unselectall()
{
if(document.del.chkAlld.checked)
{
document.del.chkAlld.checked = document.del.chkAlld.checked&0;
}
}
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.Name != "chkAlld")
e.checked = form.chkAlld.checked;
}
}
function firmDel()
{
if(confirm("确定要删除吗？一旦删除将不能恢复！\n\n点击取消，可取消此操作！"))
return true;
else
return false;
}
</SCRIPT>
</head>
<body leftmargin="0">
<table width="100%" height="32" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" background="../images/bj3.jpg">用户管理</td>
</tr>
<tr>
<td></td>
</tr>
</table>
<form name="del" method="Post" action="?action=delr" onSubmit="return firmDel();">
<table width="100%" border=1 align="center" cellPadding=3 cellSpacing=0 bordercolor="#999999" borderColorDark=#ffffff bgcolor="#F9F9F9">
<tr align="center" bgcolor="#F5FBFE">
<td width="3%"><b>选中</b></td>
<td width="11%"><b>用户名称</b></td>
<td width="9%"><b>所属区域</b></td>
<td width="18%"><b>最后登录</b></td>
<td width="4%"><strong>状态</strong></td>
<td width="15%"><strong>备注</strong></td>
<td width="18%"><strong>开通日期</strong></td>
<td width="18%"><strong>到期时期</strong></td>
<td width="5%"><b>修改</b></td>
</tr>
<%
Page = Request.QueryString("Page")
ListNum = 50
If Not IsNumeric(Page) Or Page="" Then
Page = 1
End If
Set Rs = Server.CreateObject("Adodb.Recordset")
Sql = "Select * From [User] Order By Id Desc"
Rs.Open Sql,Conn,1,1
If Not (Rs.Eof Or Rs.Bof) Then
i = 0
Rs.PageSize = ListNum
If (Page - Rs.PageCount) > 0 Then
Page = Rs.PageCount
ElseIf Page < 1 Then
Page = 1
End If
Rs.AbsolutePage = Page
Do While Not Rs.Eof And i < ListNum
%>
<tr align="center" bgcolor="#FFFFFF">
<td><input type='checkbox' name='selAnnounk' value='<%=Rs("Id")%>'></td>
<td><%=Rs("UserName")%></td>
<td><%=Rs("Class")%></td>
<td><%=Rs("LoginTime")%> </td>
<td><font color=green><%If Rs("State")=False Then Response.Write"正常" Else Response.Write "锁定" End If %></font></td>
<td><%=Server.HtmlEnCode(Rs("Content"))%> </td>
<td><%=Rs("StartTime")%></td>
<td><%=Rs("EndTime")%></td>
<td><a href="admin_userlist.asp?id=<%=Rs("Id")%>">修改</a></td>
</tr>
<%
Rs.MoveNext
i = i + 1
Loop
End If
%>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="3">
<tr>
<td width="91"><b>
<input name="chkAlld" type="checkbox" id="chkAlld" onClick=CheckAll(this.form) value="checkbox">
全选</b></td>
<td width="777"><input name="submit" type='submit' class="btn" value=' 删除选定用户 '>
</td>
</tr>
</table>
<p align='center'>
<%
If Page = 1 Then
Response.Write "<font color='#111111'>首页 上一页</font> "
Else
Response.Write "<a href=admin_user_list.asp>首页</a> <a href=admin_user_list.asp?page=" & Page - 1 & ">上一页</a> "
End If
%>
<%
If Rs.pagecount-page<=0 Then
Response.Write "<font color='#111111'>下一页 尾页</font>"
Else
Response.Write "<a href=admin_user_list.asp?page=" & Page + 1 & ">下一页</a> <a href=admin_user_list.asp?page=" & Rs.pagecount & ">尾页</a>"
End If
%>
<font color='#111111'> 页次：</font><strong><font color=red><%=Page%></font><font color='#111111'>/<%=Rs.pagecount%></strong>页</font> <font color='#111111'> 共 <b><%=Rs.recordcount%></b> 条信息 <b><%=ListNum%></b>条/页</font> </p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -