📄 admin_user.asp
字号:
<%
if session("flag")=1 then
%>
<!--#include file="pic_conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>用户管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel=stylesheet type=text/css href=style/style.css>
</head>
<body bgcolor="#799AE1" topmargin="1" leftmargin="2">
<%
dim action,userid
action=request.QueryString("action")
userid=request.QueryString("userid")
select case action
case "admin"
%>
<div align="center">
<p><font color="#195CB5" face="Verdana">修改管理员信息</font> | <font face="Verdana">
<a href="add_user.asp?action=add">
<font color="#000000">增加管理员</font></a></font></p>
<table width="500" border="0" cellspacing="1" cellpadding="4">
<tr bgcolor="#145f74">
<td height="9" width="120" class=c2>
<div align="center">
用户名</div>
</td>
<td height="9" width="120" class=c2>
<div align="center">
密码</div>
</td>
<td height="9" width="133" class=c2>
<div align="center">
权限</div>
</td>
<td height="9" width="92" class=c2>
<div align="center">
操作</div>
</td>
</tr>
<%
Set Rs=GrateRs("Select top 20 * from admin order by adminid desc",1)
if not Rs.eof then
do while not Rs.eof
%>
<form method="post" action="admin_user.asp?action=edit&userid=<%=Rs("adminid")%>" style="margin:0">
<tr>
<td height="8" width="120" align="center" class=c3>
<input type="text" name="manager" value="<%=Rs("adminname")%>" size="12">
<input type="hidden" name="id" value="" size="12"></td>
<td height="8" width="120" class=c3 align="center">
<input name="newpin" size="12" value="<%=Rs("adminpassword")%>"> </td>
<td height="8" width="133" class=c3 align="center">
<%=Rs("flag")%> <select size="1" name="flag">
<option <%if RS("flag")=2 then%> selected <%end if%> value="2">图片添加员
</option>
<option <%if RS("flag")=1 then%> selected <%end if%> value="1">网站管理员
</option>
</select> </td>
<td height="8" width="92" class=c3 align="center">
<input type="submit" name="change" value="修改">
<input type="submit" name="delet" value="删除"> </td>
</tr>
</form>
<%
Rs.movenext
loop
end if
Rs.close
case "edit"
set Rs=GrateRs("select * from admin where adminid="&userid,3)
change=request("change")
delet=request("delet")
if change<>"" then
Rs("adminname")=request.form("manager")
Rs("adminpassword")=request.form("newpin")
Rs("flag")=request.form("flag")
Rs.update
response.write "<script language='JavaScript'>{window.location='admin_user.asp?action=admin';}</script>"
end if
if delet<>"" then
Rs.delete
Rs.update
response.write "<script language='JavaScript'>{window.location='admin_user.asp?action=admin';}</script>"
end if
end select
%>
</table>
</div>
<p align="center"><font color="#FF0000">密码要：<span lang="zh-cn"><font size="2">数字+字母10位以上<br>权限设置：1为网站管理员。2为图片添加员。</font></span></font></p>
</body>
</html>
<%
else
%>
<script language="javascript">alert("你没有权限进行该项管理！")</script>
<%
response.write "<script language='JavaScript'>{window.location='right.htm';}</script>"
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -