📄 admin_user.asp
字号:
'ElitePoint = rsUser(Db.ElitePoint)
'AdvPoint = rsUser(Db.AdvPoint)
UserMoney = rsUser(Db.UserMoney)
DataCount = RsUser(Db.DataCount)
UserReMark = rsUser(Db.UserReMark)
LockUser = rsUser(Db.UserLock)
UserLogins = rsUser(Db.UserLogins)
UserLastIP = rsUser(Db.UserLastIP)
JoinDateTime = rsUser(Db.UserJoinDate)
LastLoginTime = rsUser(Db.UserLastLogin)
rsUser.close : set rsUser=Nothing
Else
UserName = ""
UserReName = ""
Question = "你叫什么名字？"
Answer = Cl.Web_Info(0)
UserSex = 1
UserGroupID = 4
UserEmail = Cl.Web_Info(8)
UserIM = ""
UserHome = Cl.Web_Info(4)
UserQQ = ""
UserICQ = ""
UserMSN = ""
UserAIM = ""
UserYahoo = ""
UserUC = ""
CityInfo = Split("中国||||||","|||")
UserBirthDay= Cdate(FormatDateTime(Now(),1) & FormatDateTime(Now(),3))
IDCard = ""
UserWorking = ""
SchoolAge = ""
UserHomePhone=""
UserMobile = ""
UserTelePhone=""
ZipCode = ""
UserAddRess = ""
ChargeType = 1
BeginDate = FormatDateTime(Now(),2)
ValidNum = 365
UserPoint = 0
'ElitePoint = 0
'AdvPoint = 0
UserMoney = 0
DataCount = 0
UserReMark = ""
LockUser = 0
End if
%>
<script language="JavaScript" type="text/javascript">
function CheckFrom()
{
<%if Action<>"Modify" then%>
if(document.myform.UserName.value=="")
{
alert("用户名不能为空！");
document.myform.UserName.focus();
return false;
}
if(document.myform.Password.value=="")
{
alert("密码不能为空！");
document.myform.Password.focus();
return false;
}
<%End if%>
if(document.myform.Question.value=="")
{
alert("密码问题不能为空！");
document.myform.Question.focus();
return false;
}
if(document.myform.Answer.value=="")
{
alert("密码答案不能为空！");
document.myform.Answer.focus();
return false;
}
if(document.myform.UserEmail.value=="")
{
alert("用户Email不能为空！");
document.myform.UserEmail.focus();
return false;
}
if((document.myform.Password.value)!=(document.myform.PwdConfirm.value))
{
alert("初始密码与确认密码不同！");
document.myform.PwdConfirm.select();
document.myform.PwdConfirm.focus();
return false;
}
if (document.myform.IsReName.checked==true)
{
if (document.myform.UserName.value=="<%=UserName%>")
{
alert("新用户名不能和旧用户名相同，请重新输入！");
document.myform.UserName.focus();
return false;
}
}
}
function ChkReName()
{
if (document.myform.IsReName.checked==true)
{
document.myform.UserName.disabled=false;
}
else
{
document.myform.UserName.disabled=true;
}
}
</script>
<script language="JavaScript" src="../Inc/Js/selectdate.js" type="text/javascript"></script>
<script language="JavaScript" src="../Inc/Js/selectcity.js" type="text/javascript"></script>
<table width="100%" align="center" border="0" cellspacing="1" cellpadding="0" class="border">
<form action="Admin_User.asp" method="post" name="myform" onSubmit="return CheckFrom();">
<tr>
<td height="22" colspan="4" align="center" class='title'><b>修改注册用户信息</b></td>
</tr>
<%if Action="AddMore" then%>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户名称：</strong></td>
<td colspan="3"><textarea name="UserName" id="UserName" cols="80" rows="10"></textarea>
<br /><a href="javascript:admin_Size(-5,'UserName')"><img src="images/minus.gif" unselectable="on" border="0" alt="" /></a> <a href="javascript:admin_Size(5,'UserName')"><img src="images/plus.gif" unselectable="on" border="0" alt="" /></a> 注：每一个用户用回车分隔，用户名与真实姓名之间用|分隔</td>
</tr>
<%else%>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户名称：</strong></td>
<td> <%
if Action="Modify" then
%><input name="UserName" type="text" size="30" style="width:190" value="<%=UserName%>" disabled /> <font color="red">*</font> <input type="checkbox" name="IsReName" value="yes" onclick="ChkReName();" /> 更改<%
else
%><input name="UserName" type="text" size="30" style="width:190" value="<%=UserName%>" /> <font color="red">*</font><%
end if%></td>
<td width="80" height="25" align="right"><strong>真实姓名：</strong></td>
<td> <input name="UserReName" type="text" size="30" style="width:190" value="<%=UserReName%>" /></td>
</tr>
<%End if%>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户密码：</strong></td>
<td height="25"><input type="password" name="Password" value="" style="width:190" size="30" maxlength="12" /><%if Action="Modify" then
%><br /><font color="#FF6600">如果不想修改，请留空</font><%
else
%> <font color="red">*</font>
<%end if%></td>
<td width="80" height="25" align="right"><strong>重复密码：</strong></td>
<td height="25"><input type="password" name="PwdConfirm" value="" style="width:190" size="30" maxlength="12" /><%if Action="Modify" then
%><br /><font color="#FF6600">如果不想修改，请留空</font><%
else
%> <font color="red">*</font>
<%end if%></td>
</tr>
<tr class="tdbg" >
<td width="80" height="25" align="right"><strong>密码问题：</strong></td>
<td><input type="text" maxlength="50" size="30" name="Question" style="width:190" value="<%=Question%>" />
<font color="#FF6600">*</font> </td>
<td width="80" height="25" align="right"><strong>问题答案：</strong></td>
<td><input type="text" maxlength="20" size="30" style="width:190" name="Answer" value="<%=Answer%>" /> <font color="#FF6600">*</font></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户性别：</strong></td>
<td height="25"> <input type="radio" value="1" name="UserSex" <%if UserSex=1 then response.write "checked"%> /> 男 <input type="radio" value="0" name="UserSex" <%if UserSex<>1 then response.write "checked"%> /> 女</td>
<td width="80" height="25" align="right"><strong>用户等级：</strong></td>
<td> <select name="UserGroupID" id="UserGroupID" style="width:190">
<%=Cl.UserGroup_Option(UserGroupID)%>
</select></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户邮箱：</strong></td>
<td> <input name="UserEmail" type="text" size="30" style="width:190" value="<%=UserEmail%>" />
<%if Action="Modify" then%><br /><a href="mailto:<%=UserEmail%>">给此用户发一封电子邮件</a><%end if%>
</td>
<td width="80" height="25" align="right"><strong>用户主页：</strong></td>
<td> <input name="UserHome" type="text" size="30" style="width:190" value="<%=UserHome%>" /></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户QQ：</strong></td>
<td> <input name="UserQQ" type="text" size="30" style="width:190" value="<%=UserQQ%>" /></td>
<td width="80" height="25" align="right"><strong>用户ICQ：</strong></td>
<td> <input name="UserICQ" type="text" size="30" style="width:190" value="<%=UserICQ%>" /></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户MSN：</strong></td>
<td> <input name="UserMSN" type="text" size="30" style="width:190" value="<%=UserMSN%>" /></td>
<td width="80" height="25" align="right"><strong>AIM号码：</strong></td>
<td><input name="UserAIM" type="text" size="30" style="width:190" value="<%=UserAIM%>" /></td>
</tr>
<tr class="tdbg" >
<td width="80" height="25" align="right"><strong>yahoo帐号：</strong></td>
<td><input name="UserYahoo" type="text" size="30" style="width:190" value="<%=UserYahoo%>" /></td>
<td width="80" height="25" align="right"><strong>UC号码：</strong></td>
<td><input name="UserUC" type="text" size="30" style="width:190" value="<%=UserUC%>" /></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>国家/省/市：</strong></td>
<td colspan="3">
<input type="text" name="Country" size="18" maxlength="50" value="<%=CityInfo(0)%>" /> /
<input type="text" name="Province" size="10" maxlength="50" value="<%=CityInfo(1)%>" />
<select name="selectp" onChange="selectcityarea('selectp','selectc','myform');myform.Province.value=this.value;">
<option value="0" selected="selected">请选择....</option>
</select> /
<input type="text" name="City" size="10" maxlength="50" value="<%=CityInfo(2)%>" />
<select name="selectc" onChange="myform.City.value=this.value;">
<option value="0" selected="selected">请选择....</option>
</select></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>出生日期：</strong></td>
<td><input name="UserBirthDay" type="text" size="30" style="width:190" value="<%=UserBirthDay%>" onfocus="show_cele_date(UserBirthDay,'','',UserBirthDay)" /></td>
<td width="80" height="25" align="right"><strong>身份证号：</strong></td>
<td><input name="IDCard" type="text" size="30" style="width:190" value="<%=IDCard%>" /></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>工作单位：</strong></td>
<td><input name="UserWorking" type="text" size="30" style="width:190" value="<%=UserWorking%>" /></td>
<td width="80" height="25" align="right"><strong>教育程度：</strong></td>
<td><select name="SchoolAge" style="width:190">
<option value="" <%if SchoolAge="" then%>selected<%end if%>>请选择....</option>
<option value="大专以下" <%if SchoolAge="大专以下" then%>selected<%end if%>>大专以下</option>
<option value="大专" <%if SchoolAge="大专" then%>selected<%end if%>>大专</option>
<option value="本科" <%if SchoolAge="本科" then%>selected<%end if%>>本科</option>
<option value="本科以上" <%if SchoolAge="本科以上" then%>selected<%end if%>>本科以上</option>
</select></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>住宅电话：</strong></td>
<td><input name="UserHomePhone" type="text" size="30" style="width:190" value="<%=UserHomePhone%>" /></td>
<td width="80" height="25" align="right"><strong>手机号码：</strong></td>
<td><input name="UserMobile" type="text" size="30" style="width:190" value="<%=UserMobile%>" /></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>办公电话：</strong></td>
<td><input name="UserTelePhone" type="text" size="30" style="width:190" value="<%=UserTelePhone%>" /></td>
<td width="80" height="25" align="right"><strong>邮政编码：</strong></td>
<td><input name="ZipCode" type="text" size="30" style="width:190" value="<%=ZipCode%>" /></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>联系地址：</strong></td>
<td colspan="3"><input name="UserAddRess" type="text" size="88" value="<%=UserAddRess%>" /></td>
</tr>
<tr class="tdbg" >
<td width="80" height="25" align="right"><strong>计费方式：</strong></td>
<td colspan="3"><input name="ChargeType" type="radio" value="1" <%if ChargeType=1 then response.write " checked"%> /> 扣<%=Cl.Web_Setting(28)%><font color="#0066CC">（推荐）</font>： 每阅读一篇收费文章，扣除相应<%=Cl.Web_Setting(28)%>。 <br />
<input type="radio" name="ChargeType" value="2" <%if ChargeType=2 then response.write " checked"%> /> 有效期：在有效期内，用户可以任意阅读收费内容</td>
</tr>
<tr class="tdbg" >
<td width="80" height="25" align="right"><strong>有效期限：</strong></td>
<td colspan="3">开始日期：
<input name="BeginDate" type="text" id="BeginDate" value="<%=BeginDate%>" size="20" maxlength="20" />
有 效 期：
<input name="ValidNum" type="text" id="ValidNum" value="<%=ValidNum%>" size="10" maxlength="10" /> 天
<br />若超过此期限，则用户不能阅读收费内容此功能只有当计费方式为“有效期限”时才有效</td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>用户<%=Cl.Web_Setting(28)%>：</strong></td>
<td> <input name="UserPoint" type="text" size="30" style="width:190" value="<%=UserPoint%>" /> <%=Cl.Web_Setting(29)%></td>
<td width="80" height="25" align="right"><strong>用户<%=Cl.Web_Setting(26)%>：</strong></td>
<td> <input name="UserMoney" type="text" size="30" style="width:190" value="<%=UserMoney%>" /> <%=Cl.Web_Setting(27)%></td>
</tr>
<tr class="tdbg" >
<td width="80" height="25" align="right"><strong>用户资料：</strong></td>
<td><input name="DataCount" value="<%=DataCount%>" size="10" maxlength="10" /> 份</td>
<td width="80" height="25" align="right"><strong></strong></td>
<td> </td>
</tr>
<tr class="tdbg" >
<td width="80" height="25" align="right"><strong>登录次数：</strong></td>
<td><%=UserLogins%></td>
<td width="80" height="25" align="right"><strong>最后ＩＰ：</strong></td>
<td><%=UserLastIP%></td>
</tr>
<tr class="tdbg" >
<td width="80" height="25" align="right"><strong>注册时间：</strong></td>
<td><%=Cl.Format_Time(JoinDateTime,1)%></td>
<td width="80" height="25" align="right"><strong>最后登录：</strong></td>
<td><%=Cl.Format_Time(LastLoginTime,1)%></td>
</tr>
<tr class="tdbg">
<td width="80" height="25" align="right"><strong>备注：</strong></td>
<td colspan="3"><textarea name="UserReMark" id="UserReMark" cols="80" rows="5"><%=UserReMark%></textarea>
<br /><a href="javascript:admin_Size(-5,'UserReMark')"><img src="images/minus.gif" unselectable="on" border="0" alt="" /></a> <a href="javascript:admin_Size(5,'UserReMark')"><img src="images/plus.gif" unselectable="on" border="0" alt="" /></a></td>
</tr>
<tr class="tdbg" >
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -