📄 adminadminedit.asp
字号:
<!--#include file="conn.asp"-->
<%
if session("adminname")="" then
response.redirect "relogin.asp"
end if
%>
<%
adminid=trim(request("adminid"))
sql1="select * from tbadmin where adminid="&adminid&""
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,2
sql="select * from tbkc order by kcid"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
powerid=rs1("power")
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>系统管理 | 综合管理 | 管理员管理 | 管理员修改</title>
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<body>
<div align="center">
<center>
<table cellspacing="1" style="border-collapse: collapse" bordercolor="#799AE1" width="100%" id="AutoNumber2" border="1">
<form method="POST" action="adminadmineditsave.asp"><tr class="trh">
<td width="100%" height="25" bgcolor="#6699CC">
<p align="center"><b> <font color="#FFFFFF">管理员信息修改</font></b></td>
</tr>
<tr>
<td width="100%" height="160" bgcolor="#FFFDE8">
<p align="center"> </p>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="217">
<tr>
<td width="26%" height="37">
<p align="right">用 户 名：</td>
<td width="74%" height="37">
<input name="username" size="40" value="<%=rs1("username")%>" readonly class="inputnormal" style="float: left"> </td>
</tr>
<tr>
<td width="26%" height="38">
<p align="right">密 码：</td>
<td width="74%" height="38"><p align="right">
<input name="pwd" size="40" value="<%=rs1("pwd")%>" onblur="this.className='inputnormal'" onfocus="this.className='inputedit';this.select()" class="inputnormal" style="float: left"></td>
</tr>
<tr>
<td width="26%" height="38">
<p align="right">姓 名：</td>
<td width="74%" height="38"><p align="right">
<input name="tname" size="40" value="<%=rs1("tname")%>" onblur="this.className='inputnormal'" onfocus="this.className='inputedit';this.select()" class="inputnormal" style="float: left"></td>
</tr>
<tr>
<td width="26%" height="38">
<p align="right">电子邮箱：</td>
<td width="74%" height="38"><p align="right">
<input name="email" size="40" value="<%=rs1("email")%>" onblur="this.className='inputnormal'" onfocus="this.className='inputedit';this.select()" class="inputnormal" style="float: left"></td>
</tr>
<tr>
<td width="26%" height="66" rowspan="2">
<p align="right">老师权限： </td>
<td width="74%" height="31"> <center>
<input type="checkbox" name="power" value="-1" <%if powerid="-1" then %>checked<% end if %>>最高管理员
<input type="checkbox" name="power" value="0" <%if powerid="0" then %>checked<% end if %> >一般管理员
</center>
</td>
</tr>
<tr>
<td width="74%" height="35"><%
do while not rs.eof %><li>
<input type="checkbox" name="power" value="<%=rs("kcid")%>" <%
idlistt=powerid
kcid=rs("kcid")
dim idarra
idArra=split(idlistt)
dim idd,kcid
if instr(idlistt,",")>0 then
for i = 0 to ubound(idarra)
idd=clng(idarra(i))
call power(idd,kcid)
if flag=1 then
%>checked<%
end if
next
if clng(idarra(0))=1 and kcid=1 then
%>checked<%
end if
else
if clng(powerid)=kcid then
%>checked<%
end if
end if %>><%=rs("kcm")%>
<% rs.movenext
loop %> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" height="25" bgcolor="#FFFDE8">
<p align="center">
<input type="submit" value="保存" name="B1" class="s02"><span lang="en-us">
</span>
<input type="button" value="关闭窗口" name="B2" onclick="self.close()" class="s02"></td>
<input name="adminid" type="hidden" size="40" value="<%=adminid%>">
</tr></form>
</table>
</center>
</div>
<p align="center">
</p>
<%
sub power(idd,kcid)
if idd=kcid then
flag=1
else
flag=0
end if
End sub
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -