⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 user_modprofile.asp

📁 本源代码为终点小说连载系统 v1.15 Build 0430 SQL清风修改版,欢迎大家下载,学习与交流
💻 ASP
字号:
<%
set rs=server.createobject("adodb.recordset")
sql="select * from [User] where ID="&UserID&""
rs.open sql,conn,1,1
%><table cellspacing="0" cellpadding="0" width="100%" bgcolor="#ffffff" border="0" align="center">
	<form name="form" onsubmit="return process_data(this)" method="post" action="User_modPost.asp">
		<tr>
			<td>
			<table cellspacing="1" cellpadding="4" width="100%" border="0">
				<tr>
					<td bgcolor="#588fc7" colspan="3" class="head"><font color="#FFFFFF"><b>资料修改</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" disabled value="<%=rs("UserName")%>" 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">6-16</font>字符,可使用英文字母、数字,第一位不得为数字。 
					</td>
				</tr>
				<tr bgcolor="#dfefff">
					<td>
					<p>Email地址:<br>
					 </p>
					</td>
					<td>
					<input maxlength="50" value="<%=rs("email")%>" 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" value="<%=rs("email")%>" 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 valign="top" bgcolor="#dfefff">
					<td nowrap>性别:</td>
					<td>
					<input type="radio" name="usersex" value="先生" <%if rs("sex")="先生" then response.write"checked" end if%>> 
					男&nbsp;&nbsp; 
					<input type="radio" name="usersex" value="女士" <%if rs("sex")="女士" then response.write"checked" end if%>> 
					女&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 value="<%=rs("question1")%>" 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 value="<%=rs("answer1")%>" 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 value="<%=rs("question2")%>" 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 value="<%=rs("answer2")%>" 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 value="<%=rs("qq")%>" 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 value="<%=rs("msn")%>" 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="<%=rs("homepage")%>"></td>
					<td>请填写您的个人主页。</td>
				</tr>
				<tr valign="top" bgcolor="#ffffff">
					<td>通迅地址:</td>
					<td>
					<input value="<%=rs("address")%>" 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 value="<%=rs("zip")%>" 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 value="<%=rs("tel")%>" 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>
				<tr>
					<td align="middle" bgcolor="#588fc7" colspan="3" class="head">
					<script language="javascript">
<!--
function process_data(theform) {

                if (theform.email.value.indexOf("@") == -1) {
                        alert("请输入正确的 Email 地址");
                        theform.email.focus();
                        return 0;
                }
                if (theform.email.value!=theform.email2.value) {
                        alert("两次输入的Email不相同,请确认并重新输入!");
                        theform.email.focus();
                        return 0;
                }

}

//-->
</script>
					<input type="hidden" value="User_reg.asp" name="url" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE">
					<input type="hidden" value="insert" name="action" style="font-family: Tahoma,'MS Shell Dlg',宋体; font-size: 12px; font-weight: normal; background-color: #EEEEEE">
					<input class="button" type="submit" value="提交申请" name="submit">
					<input class="button" type="reset" value="重置表单" name="reset">
					</td>
				</tr>
			</table>
			</td>
		</tr>
	</form>
</table>
<%rs.close
set rs=nothing 
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -