📄 edit_user.asp
字号:
<!--#include file="User_conn.asp"-->
<!--#include file="../admin/MD5.asp"-->
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>用户管理中心</title>
<link href="Images/css.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
Dim UserHS
Set UserHS = New Art_User
IF Cbool(UserHS.UserLoginChecked)=false then
Response.Write "<script>top.location.href ='login.asp' ;</script>"
Response.end
End If
%>
<table width="98%" height=20 border=0 align="center" cellPadding=2 cellSpacing=1 borderColor=#111111 class="table" id=AutoNumber3 style="BORDER-COLLAPSE: collapse">
<tr>
<td height=20 class="bg_tr"><B>个人资料修改</B></td>
<td width=583 height=20 align=right class="bg_tr"><a href="Edit_User.asp"><font color=red>·基本信息</font></a> ·<a href="Edit_User.asp?Action=ContactInfo">联系信息</a> ·<a href="Edit_User.asp?Action=PassInfo">密码设置</a> </td>
</tr>
</table>
<%
Select Case S("Action")
Case "ContactInfo"
Call ContactInfo()
Case "PassInfo"
Call PassInfo()
Case "PassSave"
Call PassSave()
Case "PassQuestionSave"
Call PassQuestionSave()
Case "BasicInfoSave"
Call BasicInfoSave()
Case "ContactInfoSave"
Call ContactInfoSave()
Case Else
Call EditBasicInfo()
End Select
'基本信息
Sub EditBasicInfo()
%>
<script>
<!----检查用户名，电子邮箱结束-->
function CheckForm(){
if (document.tcjdxr.RealName.value =="")
{
alert("请填写您的真实姓名！");
document.tcjdxr.RealName.focus();
return false;
}
if (document.tcjdxr.Sex.value =="")
{
alert("请选择您的性别！");
document.tcjdxr.Sex.focus();
return false;
}
if (document.tcjdxr.IDCard.value =="")
{
alert("请输入您的身份证号码！");
document.tcjdxr.IDCard.focus();
return false;
}
if (parseInt(document.tcjdxr.IDCard.value.length)!=15&&parseInt(document.tcjdxr.IDCard.value.length!=18))
{
alert("有效身份证号码必须是15位或18位！");
document.tcjdxr.IDCard.focus();
return false;
}
return true;
}
function changeimage()
{
document.tcjdxr.UserFace.value="images/gbook/pic/"+document.tcjdxr.Image.value+".gif";
document.tcjdxr.showimages.src='../Images/gbook/pic/'+document.tcjdxr.Image.value+'.gif';
}
</script>
<table cellspacing="1" cellpadding="3" class="table" width="98%" align="center" border="0">
<form action="Edit_User.asp?Action=BasicInfoSave" method="post" name="tcjdxr" id="tcjdxr" onSubmit="return CheckForm();">
<tr class="title">
<td height="22" colspan="2" align="center" class="bg_tr"> 基 本 资 料 </td>
</tr>
<tr >
<td width="22%" height="22" class="td_bg"><span style="font-weight: bold"> 会员名称： </span><br></td>
<td width="78%" class="td_bg">
<input class="textbox" type="text" name="username" size="30" value="<%=UserHS.username%>" disabled="disabled" />
用于登录会员中心的账号，不可修改。</td>
</tr>
<tr >
<td width="28%" height="22"><span style="font-weight: bold"> 用户头像：</span><br>
您可以为自己选择一个个性图片，
如果你填写了自定义头像部分，那么你的头像以自定义的为准。否则，请你留空自定义头像的所有栏目！
</td>
<td width="72%"><div style="margin-left:20px" class="user_face">
<%dim userfacesrc:userfacesrc=UserHS.UserFace
if userfacesrc="" or isnull(userfacesrc) then userfacesrc="Images/gbook/pic/pic(00).gif"
if ucase(left(userfacesrc,4))<>"http" then userfacesrc="../" & userfacesrc
%>
<img title=点击选择头像 style="CURSOR: hand" onClick="window.open('selectface.asp?action=face','face','width=480,height=400,resizable=1,scrollbars=1')"
height="80" src="<%=userfacesrc%>" id="imgIcon" width="80" border=1 name=showimages> <SELECT onchange=changeimage(); size=1 name=Image>
<%dim i
for i=1 to 56
response.write "<option value='pic(" & i & ")'>pic("&i&").gif</option>"
next
%>
</select>
<a href="#" onClick="window.open('selectface.asp?action=face','face','width=480,height=400,resizable=1,scrollbars=1')"><font color=red>预览头像</font></a>
<br>
自定义头像地址：
<input class="textbox" name="UserFace" type="text" id="UserFace" value="<%=Replace(userfacesrc,"../","")%>" size="30" maxlength="60" /><br>
<iframe name="ad" frameborder=0 width=100% height=30 scrolling=no src=uploadface.asp></iframe>
只支持jpg、gif、png，小于50k，默认尺寸为48*48
</td>
</tr>
<tr >
<td width="22%" height="22" class="td_bg"><span style="font-weight: bold"> 真实姓名：</span><br>
请务必填写真实姓名</td>
<td width="78%" class="td_bg">
<input name="RealName" class="textbox" type="text" id="RealName" value="<%=UserHS.Realname%>" size="30" maxlength="50" />
<span style="color: red">* </span></td>
</tr>
<tr >
<td width="22%" height="22" class="td_bg"><span style="font-weight: bold">性 别：</span><br>
请选择您的性别</td>
<td width="78%" class="td_bg">
<select name="Sex" id="Sex" style="width:110">
<option value="">==请选择性别==</option>
<option value="0" <%if UserHS.sex="0" then%> selected="selected" <%else%><%end if%>>男</option>
<option value="1" <%if UserHS.sex="1" then%> selected="selected" <%else%><%end if%>>女</option>
</select>
<span style="color: red">* </span></td>
</tr>
<tr >
<td width="28%" height="22"><span style="font-weight: bold"> 身份证号：</span><br>
有效身份证号码应该是15位或18位，请认真填写。</td>
<td width="72%">
<input class="textbox" name="IDCard" type="text" id="IDCard" value="<%=UserHS.IDCard%>" size="30" maxlength="50" />
<span style="color: red">* </span></td>
</tr>
<tr >
<td width="22%" height="22" class="td_bg"><span style="font-weight: bold"> 出生日期：</span><br>
请填写正确的出生日期，格式：0000-00-00</td>
<td width="78%" class="td_bg">
<input name="Birthday" class="textbox" type="text" id="Birthday" value="<%=UserHS.Birthday%>" size="30" maxlength="50" />
<span style="color: red">*</span></td>
</tr>
<tr >
<td height="22" class="td_bg"><span style="font-weight: bold">隐私设定：</span><br>开放后别人可以看到您的性别、Email、QQ等信息</td>
<td class="td_bg">
<input type="radio" <%if UserHS.Privacy=0 Then Response.Write "checked=""checked"""%> value="0" name="Privacy" />
公开全部信息(包括真实姓名/电话号码/生日等) <br />
<input type="radio" value="1" name="Privacy" <%if UserHS.Privacy=1 Then Response.Write "checked=""checked"""%>/>
公开部分信息(只公开QQ/Email等网上联络的信息) <br />
<input type="radio" value="2" name="Privacy" <%if UserHS.Privacy=2 Then Response.Write "checked=""checked"""%>/>
完全保密(别人只能查看你的昵称) </td>
</tr>
<tr >
<td width="28%" height="22"><span style="font-weight: bold">个人签名：</span><br>写上你的个性签名，说明文字不超过1000个字符。</td>
<td width="72%">
<textarea name="Sign" class="textbox" cols="60" rows="5" id="Sign" style="width:300px; height:60px"><%= UserHS.Sign%></textarea></td>
</tr> <tr >
<td width="22%" height="30" class="td_bg"> </td>
<td width="78%" class="td_bg"><input name="Submit" type="submit" value=" 修 改 " />
<input name="Submit2" type="reset" value=" 重 填 " /> </td>
</tr>
</form>
</table>
<%
End Sub
'联系信息
Sub ContactInfo()
%>
<script>
function CheckForm()
{
if (document.tcjdxr.OfficeTel.value =="")
{
alert("请填写您的办公电话！");
document.tcjdxr.OfficeTel.focus();
return false;
}
if (document.tcjdxr.Email.value =="")
{
alert("请输入您的电子信箱！");
document.tcjdxr.Email.focus();
return false;
}
if((document.tcjdxr.Email.value.indexOf("@")==-1)||(document.tcjdxr.Email.value.indexOf(".")==-1))
{
alert("您输入的电子邮件地址有误！");
document.tcjdxr.Email.focus();
return false;
}
if (document.tcjdxr.Address.value =="")
{
alert("请输入您的联系地址！");
document.tcjdxr.Address.focus();
return false;
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -