user.asp

功能介绍： 一、会员功能模块 1、站内短信发布(设计中) 2、书架收藏夹 3、发表评论(功能不完善) 4、申请作家(与添书员整合) 5、申请添书员(与作家整合) 6、申请更新员

<!--#include file="../inc/md5.asp"--><%
Select Case request.querystring("info")
	Case "reg"
		Call reg()
	Case "regtrue"
		Call regtrue()
	Case "regpost"
		Call regpost()
end select 
%><%Sub reg()%>
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="table4">
        <tr> 
          <td valign="top"><table cellspacing='0' cellpadding='0' width='100%' border='0' align='center'><tr><td colspan='2' align='center'><!-- #include file='../Inc/regtext.txt' --></td></tr><tr><td colspan='2' align='center'><input name=Submit type=button onclick="window.location.href='User.asp?info=regtrue'" value=" 我同意 ">&nbsp;&nbsp;<input name=button type=button onclick="window.location.href='index.asp'" value=" 不同意 "></td></tr></table></td>
        </tr>
      </table>
<%end sub%>
<!-------------------------------------------------------------------------------------->
<%Sub regtrue()%>
<%if WebUser=0 then%>
<table cellspacing="0" cellpadding="0" width="100%" bgcolor="#ffffff" border="0" align="center">
	<form name="registerform" onsubmit="return process_data(this)" method="post" action="User.asp?info=regpost">
		<tr>
			<td>
			<table cellspacing="1" cellpadding="4" width="100%" border="0">
				<tr>
					<td bgcolor="#588fc7" colspan="3" class="head"><font color="#FFFFFF"><b><%=SiteName%> 
					新 用 户 注 册</b></font></td>
				</tr>
				<tr>
					<td bgcolor="#588fc7" colspan="3" class="head"><font color="#FFFFFF"><b>必填选项</b>,请输入完整的信息,带*的均为必填选项,除用户名外,其它所有选项均为保密</font></td>
				</tr>
				<tr bgcolor="#ffffff">
					<td width="20%">用户名:<br>
					　</td>
					<td width="30%">
					<input maxlength="16" name="username" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE" size="25" onkeyup="value=value.replace(/[\W]/g,'')" onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))">
					</td>
					<td width="50%">　*用户名长度<font face="Times New Roman">2-18</font>字符，可使用英文字母、数字，第一位不得为数字。 
					</td>
				</tr>
				<tr bgcolor="#ffffff">
					<td width="20%">昵称:<br>
					　</td>
					<td width="30%">
					<input maxlength="16" name="name" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE" size="25">
					</td>
					<td width="50%">　*昵称长度<font face="Times New Roman">1-8</font>字符，可使用英文字母、数字、汉字。 
					</td>
				</tr>
				<tr bgcolor="#dfefff">
					<td>Email地址:<br>
					</td>
					<td>
					<input maxlength="50" onchange="javascript:this.value=this.value.toLowerCase();" size="38" name="email" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>　*50个字符以内,请如实填写,以保证身份验证通过和取回密码。</td>
				</tr>
				<tr bgcolor="#dfefff">
					<td>重复确认Email地址:</td>
					<td>
					<input maxlength="50" onchange="javascript:this.value=this.value.toLowerCase();" size="38" name="email2" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>　*请再输入Email地址。</td>
				</tr>
				<tr bgcolor="#ffffff">
					<td>密码:<br>
					　</td>
					<td>
					<input type="password" maxlength="18" value name="password" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE" size="28"></td>
					<td>　*密码可使用英文字母、数字。长度6-18字符。</td>
				</tr>
				<tr bgcolor="#ffffff">
					<td>确认密码:</td>
					<td>
					<input type="password" maxlength="18" value name="password2" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE" size="28"></td>
					<td width="410">　*请再输入一次密码。</td>
				</tr>
				<tr valign="top" bgcolor="#dfefff">
					<td>性别:</td>
					<td><input type="radio" name="usersex" value="先生" checked> 男&nbsp;&nbsp; 
					<input type="radio" name="usersex" value="女士"> 女&nbsp; </td>
					<td>　*请输入您的性别</td>
				</tr>
				<tr>
					<td bgcolor="#588fc7" colspan="3" class="head"><font color="#FFFFFF"><b>第一组密码保护设置</b>(当您遗失密码的时候,可通过填写密码保护资料来设置、启用新的密码)</font></td>
				</tr>
				<tr valign="top" bgcolor="#dfefff">
					<td>密码提示问题<font face="Times New Roman">A</font>:</td>
					<td>
					<input name="question1" type="text" id="question1" maxlength="30" size="35" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>　*当您忘记密码时可以通过密码提示问题和答案找回密码 <br>
					　例如：我的哥哥是谁？</td>
				</tr>
				<tr valign="top" bgcolor="#ffffff">
					<td>密码提示答案<font face="Times New Roman">A</font>:</td>
					<td>
					<input name="answer1" type="text" id="answer1" maxlength="20" size="35" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>　*请输入密码提示问题答案<br>
					　密码提示问题答案长度应不少于<font face="Times New Roman">6</font>位</td>
				</tr>
				<tr>
					<td bgcolor="#588fc7" colspan="3" class="head"><font color="#FFFFFF"><b>第二组密码保护设置</b>(当您遗失密码的时候,可通过填写密码保护资料来设置、启用新的密码)</font></td>
				</tr>
				<tr valign="top" bgcolor="#dfefff">
					<td>密码提示问题<font face="Times New Roman">B</font>:</td>
					<td>
					<input name="question2" type="text" id="question2" maxlength="30" size="35" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>　*当您忘记密码时可以通过密码提示问题和答案找回密码 <br>
					　例如：我的哥哥是谁？</td>
				</tr>
				<tr valign="top" bgcolor="#ffffff">
					<td>密码提示答案<font face="Times New Roman">B</font>:</td>
					<td>
					<input name="answer2" type="text" id="answer2" maxlength="20" size="35" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>　*请输入密码提示问题答案<br>
					　密码提示问题答案长度应不少于<font face="Times New Roman">6</font>位</td>
				</tr>
				<tr>
					<td bgcolor="#588fc7" colspan="3" class="head"><font color="#FFFFFF"><b>选填选项</b></font></td>
				</tr>
				<tr valign="top" bgcolor="#dfefff">
					<td>Qq号码:</td>
					<td>
					<input maxlength="15" name="qq" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE" size="30"></td>
					<td>请填写您的 QQ号码。</td>
				</tr>
				<tr valign="top" bgcolor="#ffffff">
					<td>Msn号码:</td>
					<td>
					<input maxlength="50" name="msn" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE" size="30"></td>
					<td>请填写您的Msn号码。</td>
				</tr>
				<tr valign="top" bgcolor="#dfefff">
					<td>个人主页:</td>
					<td>
					<input maxlength="100" name="homepage" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE" size="50" value="http://"></td>
					<td>请填写您的个人主页。</td>
				</tr>
				<tr valign="top" bgcolor="#ffffff">
					<td>通迅地址:</td>
					<td>
					<input size="55" name="address" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>可邮寄物品的地址。</td>
				</tr>
				<tr valign="top" bgcolor="#dfefff">
					<td>邮政编码:</td>
					<td>
					<input name="zip" type="text" id="zip" maxlength="20" size="20" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>请填写您有效的邮政编码。</td>
				</tr>
				<tr valign="top" bgcolor="#ffffff">
					<td>联系电话:</td>
					<td>
					<input maxlength="15" size="35" name="tel" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE"></td>
					<td>请输入真实固定联系电话。请填写区号（如021-50504728）。</td>
				</tr>
<%if WebUserLOCKNum=1 then
randomize
randm=Int((900000*rnd)+100000)
response.write "<tr><td align=right>验证码：</td><td colSpan=3><input name=randm1 type=text class=form size=10 maxlength=20><input type=hidden name=randm2 value="&randm&">"
response.write "<span style='font-family: Georgia;border: 1 solid #808080;background-color: #e8e8e8'>&nbsp;<b>"&randm&"</b></span></td></tr>"
end if%>
				<tr>
					<td align="middle" bgcolor="#588fc7" colspan="3" class="head">
					<script language="javascript">
<!--
function process_data(theform) {

                if (theform.username.value=="") {
                        alert("请输入用户名!");
                        theform.username.focus();
                        return false;
                }

                var username=theform.username.value;
                if (username.length<2) {
                        alert("你所输入的用户名太短,至少也要输入 2 个字符");
                        theform.username.focus();
                        return false;
                }
                if (username.length>18) {
                        alert("你所输入的用户名太长,最多只能输入 18 个字符");
                        theform.username.focus();
                        return false;
                }

                if (theform.name.value=="") {
                        alert("请输入昵称!");
                        theform.name.focus();
                        return false;
                }

                var name=theform.name.value;