📄 admin_usermod.asp
字号:
<%
Option Explicit
Response.buffer=true
const purviewlevel=2
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<%
dim rsmod,userid
userid=trim(request.querystring("userid"))
if userid="" then
response.redirect("admin_userMan.sp")
call closeconn()
end if
set rsmod=server.createobject("ADODB.Recordset")
rsmod.open"select * from reguser where userid="&userid&"",conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户资料修改</title>
<script Language=JavaScript>
function checkform()
{
var userlevel=window.document.Formreg.userlevel.value
if(userlevel=="")
{
alert("请选择用户等级!");
return false;
}
}
</script>
<link href="style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.tabcss {
font-style: normal;
line-height: normal;
border: thin none;
padding: 1px;
background-repeat: repeat;
height: auto;
width: auto;
background-attachment: fixed;
}
-->
</style>
</head>
<body>
<form name="Formreg" method="post" action="admin_UserModSave.asp" onsubmit="return checkform();">
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#f5f8f5">
<tr align="center">
<td colspan="2" class="txt1">用户资料(带<span class="txt04">*</span>为必填）</td>
</tr>
<tr>
<td width="369" align="right" class="txt05"> <strong class="txt05">用户名 </strong>： </td>
<td width="385"><span class="txt04"><%=rsmod("usid")%>
</span></td>
</tr>
<tr>
<td align="right" class="txt05"><strong>真实姓名</strong>： </td>
<td class="txt05"><%=rsmod("usname")%> </td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户Email</strong>： </td>
<td class="txt05"><%=rsmod("userEmail")%> </td>
</tr>
<tr>
<td align="right" class="txt05"> <strong>性别 </strong>： </td>
<td class="txt05"><input name="sex" type="radio" class="txt05" value="1" checked>
<img src="../img/Male.gif" width="23" height="21">男孩
<input name="sex" type="radio" class="txt05" value="0">
<img src="../img/Female.gif" width="23" height="21">女孩</td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户主页</strong>：</td>
<td class="txt05"><%=rsmod("homepage")%> </td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户ICQ</strong>： </td>
<td class="txt05"><%=rsmod("icq")%> </td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户MSN</strong>：</td>
<td class="txt05"><%=rsmod("msn")%> </td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户联系电话</strong>： </td>
<td class="txt05"><%=rsmod("ustel")%> </td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户联系地址</strong>： </td>
<td class="txt05"><%=rsmod("usaddress")%> </td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户简介</strong>：</td>
<td class="txt05"><%=rsmod("usintr")%> </td>
</tr>
<tr>
<td align="right" class="txt05"><strong>用户等级：</strong></td>
<td><select name="userlevel" class="but" id="userlevel">
<option value="" <%If (Not isNull(rsmod("userlevel"))) Then If ("" = CStr(rsmod("userlevel"))) Then Response.Write("SELECTED") : Response.Write("")%>>请选择用户等级</option>
<option value="1" <%If (Not isNull(rsmod("userlevel"))) Then If ("1" = CStr(rsmod("userlevel"))) Then Response.Write("SELECTED") : Response.Write("")%>>注册用户</option>
<option value="2" <%If (Not isNull(rsmod("userlevel"))) Then If ("2" = CStr(rsmod("userlevel"))) Then Response.Write("SELECTED") : Response.Write("")%>>普通会员</option>
<option value="3" <%If (Not isNull(rsmod("userlevel"))) Then If ("3" = CStr(rsmod("userlevel"))) Then Response.Write("SELECTED") : Response.Write("")%>>中级会员</option>
<option value="4" <%If (Not isNull(rsmod("userlevel"))) Then If ("4" = CStr(rsmod("userlevel"))) Then Response.Write("SELECTED") : Response.Write("")%>>高级会员</option>
<option value="5" <%If (Not isNull(rsmod("userlevel"))) Then If ("5" = CStr(rsmod("userlevel"))) Then Response.Write("SELECTED") : Response.Write("")%>>特级会员</option>
</select>
<span class="txt04">*</span></td>
</tr>
<tr>
<td align="right" class="txt05"><strong>是否通过审核：</strong></td>
<td><input name="userpassed" type="checkbox" class="but" id="userpassed" value="yes" <%if rsmod("userpassed")=true then%>checked<%end if%>></td>
</tr>
<tr align="center">
<td colspan="2" class="tbbgtitle"><input name="Submit" type="submit" class="but" value="修改">
<input name="usermod" type="hidden" id="usermod" value="mod">
<input name="userid" type="hidden" id="userid" value="<%=rsmod("userid")%>">
<input name="oldusid" type="hidden" id="oldusid" value="<%=rsmod("userid")%>"> </tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -