📄 bbs.asp
字号:
<!--#include file="ked.asp"-->
<!--#include file="conn.asp"-->
<%
dim lei,sql,name,admin,user,fen,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18,a19,a20,a21,a22,rs2
name=request("name")
user=Request.Cookies("aduser")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from [admin] where name='"&user&"'"
rs.open sql,conn,1,1
if rs.eof then
Response.Write("<div align=center><br><br><br><br><br><br><br>·不存在该用户或者该用户已经是管理员<br><br><a href='javascript:history.go(-1)'><img border=0 src=menu/face12.gif align=absmiddle><font color=#000000>返回重新填写!</font></a></div>")
else
fen=rs("fen")
lei=split(fen,"|")
if lei(5)="0" then
Response.Write("<div align=center><img src=menu/face12.gif>贴心提示:“5.可能是您的后台等级不适和该操作;因此系统已自动将其保留,望以后多努力哦!”</div>")
response.End
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
.STYLE1 {color: #FFFFFF}
body,td,th {
font-size: 12px;
}
.STYLE2 {color: #FF0000}
-->
</style>
</head>
<body>
<form id="form2" name="form2" method="post" action="?action=edit">
<table width="100%" border="0" align="center" cellpadding="6" cellspacing="1" bgcolor="#698CC3">
<tr>
<td><div align="center" class="STYLE1">尊敬的<font color=red><%=user%></font>你好,欢迎您修改管理人员权限!</div></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">当前已有管理人员：
<%set rs=conn.execute("select name from admin"):do while not rs.eof:response.write "<a href=?action=edit&name="&rs("name")&"><font color=red>"&rs("name")&"</font></a>"&" | ":rs.movenext:loop:set rs=nothing%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">
后台用户名：
<input name="name" type="text" id="name" />
<input type="submit" name="Submit3" value=" 修改用户权限 " />
</td>
</tr>
</table>
</form>
<%
if request("action")="save" then
if request("dj")="" then
Response.Write("<div align=center><br><br><br><br><br><br><br>·您必须选择该用户的等级<br><br><a href='javascript:history.go(-1)'><img border=0 src=pic/re.gif align=absmiddle><font color=#000000>返回重新填写!</font></a></div>")
else
a1=request.form("1")
a2=request.form("2")
a3=request.form("3")
a4=request.form("4")
a5=request.form("5")
a6=request.form("6")
a7=request.form("7")
a8=request.form("8")
a9=request.form("9")
a10=request.form("10")
a11=request.form("11")
a12=request.form("12")
a13=request.form("13")
a14=request.form("14")
a15=request.form("15")
a16=request.form("16")
a17=request.form("17")
a18=request.form("18")
a19=request.form("19")
a20=request.form("20")
a21=request.form("21")
a22=request.form("22")
fen=a1&"|"&a2&"|"&a3&"|"&a4&"|"&a5&"|"&a6&"|"&a7&"|"&a8&"|"&a9&"|"&a10&"|"&a11&"|"&a12&"|"&a13&"|"&a14&"|"&a15&"|"&a16&"|"&a17&"|"&a18&"|"&a19&"|"&a20&"|"&a21&"|"&a22
set rs=server.createobject("adodb.recordset")
sql="select * from [admin] where name='"&name&"'"
rs.open sql,conn,1,3
rs("fen")=fen
rs("dj")=request.form("dj")
rs.update
rs.Close
set rs2=nothing
response.write"<script>alert('后台权限修改成功!');location.href='bbs.asp'</script>"
end if
end if
if request("action")="edit" then
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from [admin] where name='"&name&"'"
rs.open sql,conn,1,1
if rs.eof then
Response.Write("<div align=center><br><br><br><br><br><br><br>·不存在该用户或者该用户已经是管理员<br><br><a href='javascript:history.go(-1)'><img border=0 src=pic/re.gif align=absmiddle><font color=#000000>返回重新填写!</font></a></div>")
else
fen=rs("fen")
lei=split(fen,"|")
%>
<form id="form1" name="form1" method="post" action="?action=save">
<input type=hidden name=name value="<%=name%>">
<table width="100%" border="0" align="center" cellpadding="6" cellspacing="1" bgcolor="#698CC3">
<tr>
<td colspan="2" bgcolor="#698CC3"><div align="center" class="STYLE1">后台权限设置</div></td>
</tr>
<tr>
<td colspan="2" bgcolor="#D6E0EF"><div align="center">用户信息</div></td>
</tr>
<tr>
<td width="128" bgcolor="#FFFFFF">用户名</td>
<td width="445" bgcolor="#FFFFFF">→<b><font color="#FF0000"> <%=name%> </font></b>←当前后台身份是：<b>→<font color="#FF0000"><%=rs("dj")%></font>←</b></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">后台身份</td>
<td width="445" bgcolor="#FFFFFF"><input name="dj" type="text" id="dj" value="<%=rs("dj")%>" />
必须填写</td>
</tr>
<tr>
<td colspan="2" bgcolor="#D6E0EF"><div align="center">网站管理</div></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">1.系统基本设置</td>
<td bgcolor="#FFFFFF"><input type="radio" name="1" value="1" <%if lei(0)=1 then%>checked<%end if%> />
打开
<input type="radio" name="1" value="0" <%if lei(0)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">2.注册协议</td>
<td bgcolor="#FFFFFF"><input type="radio" name="2" value="1" <%if lei(1)=1 then%>checked<%end if%> />
打开
<input type="radio" name="2" value="0" <%if lei(1)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">3.添加管理员</td>
<td bgcolor="#FFFFFF"><input type="radio" name="3" value="1" <%if lei(2)=1 then%>checked<%end if%> />
打开
<input type="radio" name="3" value="0" <%if lei(2)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">4.管理员设置</td>
<td bgcolor="#FFFFFF"><input type="radio" name="4" value="1" <%if lei(3)=1 then%>checked<%end if%> />
打开
<input type="radio" name="4" value="0" <%if lei(3)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">5.管理员权限</td>
<td bgcolor="#FFFFFF"><input type="radio" name="5" value="1" <%if lei(4)=1 then%>checked<%end if%> />
打开
<input type="radio" name="5" value="0" <%if lei(4)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">6.管理员登陆信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="6" value="1" <%if lei(5)=1 then%>checked<%end if%> />
打开
<input type="radio" name="6" value="0" <%if lei(5)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">7.员工登陆信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="7" value="1" <%if lei(6)=1 then%>checked<%end if%> />
打开
<input type="radio" name="7" value="0" <%if lei(6)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">8.所有员工信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="8" value="1" <%if lei(7)=1 then%>checked<%end if%> />
打开
<input type="radio" name="8" value="0" <%if lei(7)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">9.审核注册信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="9" value="1" <%if lei(8)=1 then%>checked<%end if%> />
打开
<input type="radio" name="9" value="0" <%if lei(8)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">10.添加员工信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="10" value="1" <%if lei(9)=1 then%>checked<%end if%> />
打开
<input type="radio" name="10" value="0" <%if lei(9)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">11.添加公告</td>
<td bgcolor="#FFFFFF"><input type="radio" name="11" value="1" <%if lei(10)=1 then%>checked<%end if%> />
打开
<input type="radio" name="11" value="0" <%if lei(10)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">12.公告管理</td>
<td bgcolor="#FFFFFF"><input type="radio" name="12" value="1" <%if lei(11)=1 then%>checked<%end if%> />
打开
<input type="radio" name="12" value="0" <%if lei(11)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">13.查看我的留言</td>
<td bgcolor="#FFFFFF"><input type="radio" name="13" value="1" <%if lei(12)=1 then%>checked<%end if%> />
打开
<input type="radio" name="13" value="0" <%if lei(12)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">14.发送我的留言</td>
<td bgcolor="#FFFFFF"><input type="radio" name="14" value="1" <%if lei(13)=1 then%>checked<%end if%> />
打开
<input type="radio" name="14" value="0" <%if lei(13)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td colspan="2" bgcolor="#D6E0EF"><div align="center">其他功能</div></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">15.设置工资类型</td>
<td bgcolor="#FFFFFF"><input type="radio" name="15" value="1" <%if lei(14)=1 then%>checked<%end if%> />
打开
<input type="radio" name="15" value="0" <%if lei(14)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">16.已分职位列表</td>
<td bgcolor="#FFFFFF"><input type="radio" name="16" value="1" <%if lei(15)=1 then%>checked<%end if%> />
打开
<input type="radio" name="16" value="0" <%if lei(15)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">17.员工签到信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="17" value="1" <%if lei(16)=1 then%>checked<%end if%> />
打开
<input type="radio" name="17" value="0" <%if lei(16)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">18.添加结算信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="18" value="1" <%if lei(17)=1 then%>checked<%end if%> />
打开
<input type="radio" name="18" value="0" <%if lei(17)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">19.查看结算信息</td>
<td bgcolor="#FFFFFF"><input type="radio" name="19" value="1" <%if lei(18)=1 then%>checked<%end if%> />
打开
<input type="radio" name="19" value="0" <%if lei(18)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">20.现金提取处理</td>
<td bgcolor="#FFFFFF"><input type="radio" name="20" value="1" <%if lei(19)=1 then%>checked<%end if%> />
打开
<input type="radio" name="20" value="0" <%if lei(19)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">21.管理员月结操作</td>
<td bgcolor="#FFFFFF"><input type="radio" name="21" value="1" <%if lei(20)=1 then%>checked<%end if%> />
打开
<input type="radio" name="21" value="0" <%if lei(20)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">22.数据库管理</td>
<td bgcolor="#FFFFFF"><input type="radio" name="22" value="1" <%if lei(21)=1 then%>checked<%end if%> />
打开
<input type="radio" name="22" value="0" <%if lei(21)=0 then%>checked<%end if%> />
关闭</td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"><div align="center">
<input type="submit" name="Submit" value=" 保存设置 " />
<label>
<input type="reset" name="Submit2" value=" 重置设置 " />
</label>
</div></td>
</tr>
</table>
</form>
<%
end if
end if
end if%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -