📄 admin_adminman.asp
字号:
<%
Option Explicit
Response.buffer=true
const purviewlevel=1
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<%
dim rsadmin
set rsadmin=server.createobject("ADODB.Recordset")
rsadmin.open"select * from admin order by adminid desc",conn,1,1
if rsadmin.eof or rsadmin.bof then
response.write"<div align='center'><br><br>还没有系统管理员，请添加管理员！</div>"
response.end()
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理员管理</title>
<link href="Style.css" rel="stylesheet" type="text/css">
<script language=javascript>
function checkdel()
{
if(confirm("你确定要删除该管理员吗？一旦删除，将不能恢复！"))
return true;
else
return false;
}
</script>
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" class="txt1">欢迎来到管理员管理面板</td>
</tr>
<tr>
<td align="center" class="txt05">［<a href="admin_AdminAdd.asp">添加管理员</a>］</td>
</tr>
<tr>
<td><table width="99%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#f5f8f5">
<tr align="center">
<td class="tbbgtitle">管理员帐号</td>
<td class="tbbgtitle">密码</td>
<td class="tbbgtitle">权限</td>
<td class="tbbgtitle">文章</td>
<td class="tbbgtitle">BBS</td>
<td class="tbbgtitle">操作</td>
</tr>
<%do while not rsadmin.eof %>
<tr align="center" class="txt05">
<td><%=rsadmin("adminname")%></td>
<td>******</td>
<td><% select case rsadmin("adminpurview")
case 1
response.write"特级管理员"
case 2
response.write"高级管理员"
case 3
response.write"大类管理员"
case 4
response.write"小类管理员"
case 5
response.write"文章管理员"
end select
%></td>
<td><%=rsadmin("article")%></td>
<td><%=rsadmin("bbs")%></td>
<td><a href="admin_AdminMod.asp?adminid=<%=rsadmin("adminid")%>">修改</a> | <a href="admin_AdminDel.asp?adminid=<%=rsadmin("adminid")%>&admindel=del" onclick="return checkdel();">删除</a>
<input name="admindel" type="hidden" id="admindel" value="del"></td>
</tr>
<% rsadmin.movenext
loop
%>
</table></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td><table width="80%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td class="txt03"><strong>管理员权限说明：</strong><br>
<strong>特级管理员：</strong>拥有一切权限；<br>
<strong>高级管理员：</strong>除了管理员的管理外，拥有管理其它的一切权限； <br>
<strong>大类管理员：</strong>除具有小类管理员权限外，可对调查、栏目、专题、公告、广告进行管理，可删除文章、公告，上传文件等； <br>
<strong>小类管理员：</strong>除具有文章管理员权限外，可对文章评论、BBS、友情链接添加、管理、审核等； <br>
<strong>文章管理员：</strong>具有添加、审核、管理文章的权限。</td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
<%
end if
rsadmin.close
set rsadmin=nothing
call closeconn()
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -