📄 user_edit.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="chkadmin.asp"-->
<%dim id,utype,sql,rs
id=Cint(Trim(Request.QueryString("id")))
utype=Trim(Request.QueryString("type"))
sql="select ID,USR,PWD,Email,QQ,ICQ,MSN,Homepage,Power from UserInfo where ID="&id
set rs=conn.execute(sql)%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="../style.css" rel="stylesheet" type="text/css">
<STYLE>
BODY {
scrollbar-face-color : #96A2AD;
scrollbar-shadow-color : #96A2AD;
scrollbar-highlight-color : #96A2AD;
scrollbar-3dlight-color : #96A2AD;
scrollbar-darkshadow-color : #96A2AD;
scrollbar-track-color : #CCCCCC;
scrollbar-arrow-color : #FFFFFF;
}
</STYLE>
</head>
<body>
<form name="form1" method="post" action="user_edit_save.asp">
<table width="300" border="0" align="center" cellpadding="2" cellspacing="0" bgcolor="#EEEEEE">
<tr bgcolor="#708090">
<td colspan="2" align="center" class="TdBorderB"><font color="#FFFFFF">修改用户资料</font></td>
</tr>
<tr>
<td width="76" align="right" class="TdBorderRB">用户名</td>
<td width="216" class="TdBorderB"><input name="usr" type="text" class="input" id="usr" value="<%=rs(1)%>" onfocus="this.blur()">
<input name="id" type="hidden" id="id" value="<%=rs(0)%>">
<input name="type" type="hidden" id="type" value="<%=utype%>"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">密码</td>
<td class="TdBorderB"><input name="pwd" type="password" class="input" id="pwd3" value="<%=rs(2)%>"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">重复密码</td>
<td class="TdBorderB"><input name="pwd2" type="password" class="input" id="pwd2" value="<%=rs(2)%>"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">E-mail</td>
<td class="TdBorderB"><input name="email" type="text" class="input" id="email" value="<%=rs(3)%>" size="30"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">腾讯QQ</td>
<td class="TdBorderB"><input name="qq" type="text" class="input" id="qq" value="<%=rs(4)%>"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">ICQ</td>
<td class="TdBorderB"><input name="icq" type="text" class="input" id="icq" value="<%=rs(5)%>"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">MSN</td>
<td class="TdBorderB"><input name="msn" type="text" class="input" id="msn" value="<%=rs(6)%>" size="30"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">主页</td>
<td class="TdBorderB"><input name="homepage" type="text" class="input" id="homepage" value="<%=rs(7)%>" size="30"></td>
</tr>
<tr>
<td align="right" class="TdBorderRB">权限设置</td>
<td class="TdBorderB">
<%dim powers
powers=split(rs(8),",")%>
<input name="power1" type="checkbox" id="power1" value="1"<%if powers(0)="1" then response.write " checked"%>>
添加软件
<input name="power2" type="checkbox" id="power2" value="1"<%if powers(1)="1" then response.write " checked"%>>
删除软件 <br>
<input name="power3" type="checkbox" id="power3" value="1"<%if powers(2)="1" then response.write " checked"%>>
修改软件
<input name="power4" type="checkbox" id="power4" value="1"<%if powers(3)="1" then response.write " checked"%>>
审核软件 <br>
<input name="power5" type="checkbox" id="power5" value="1"<%if powers(4)="1" then response.write " checked"%>>
管理他人添加的软件<br>
<input name="power6" type="checkbox" id="power6" value="1"<%if powers(5)="1" then response.write " checked"%>>
高级管理(分类、用户管理等)</td>
</tr>
<tr align="center">
<td colspan="2">
<%if power(5)="0" then
response.write "<font color=red>您没有修改用户信息的权限</font> "
else
response.write "<input name='Submit' type='submit' class='button' value=' 提 交 '> "
end if
response.write "<input name='Submit' type='button' class='button' value=' 返 回 ' onclick='javascript:history.back()'>"%>
</td>
</tr>
</table>
</form>
</body>
</html>
<%set rs=nothing
conn.close
set conn=nothing%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -