📄 modify.asp
字号:
<!--#include file="top.asp" -->
<%If request.Cookies("UserId")="" then
response.Write("<script>alert('请先登录！');location='index.asp'</script>")
end if
%>
<%
dim rs
If request("action")="saveedit" then
dim UserId,Pwd,UserName,Job,State,city,Tel,qq,Mail,Add,ZipCode,Sfz,ans,qus
if len(trim(Request.Form("Password1")))<6 then
response.Write("<script>alert('密码长度不得小于6位！');history.back()</script>")
response.End()
end if
ans=checkStr(Request.Form("ans"))
qus=checkStr(Request.Form("qus"))
if ans="" or qus="" then
response.Write("<script>alert('密码提示问题或答案不能为空！');history.back()</script>")
response.End()
end if
Pwd=checkStr(Request.Form("Password1"))
UserName=checkStr(Request.Form("UserName"))
if UserName="" then
response.Write("<script>alert('真实姓名不能为空！');history.back()</script>")
response.End()
end if
Job=checkStr(Request.Form("Job"))
State=checkStr(Request.Form("State"))
Tel=checkStr(Request.Form("Tel"))
if Tel="" then
response.Write("<script>alert('联系电话不能为空！');history.back()</script>")
response.End()
end if
city=checkStr(Request.Form("city"))
qq=checkStr(Request.Form("qq"))
Mail=checkStr(Request.Form("Mail"))
if IsValidEmail(Mail)=false then
response.Write("<script>alert('E-mail格式不正确！');history.back()</script>")
response.End()
end if
Add=checkStr(Request.Form("Add"))
ZipCode=checkStr(Request.Form("ZipCode"))
Sfz=checkStr(Request.Form("Sfz"))
if Sfz="" then
response.Write("<script>alert('手机号码不能为空！');history.back()</script>")
response.End()
end if
set rs=server.CreateObject("Adodb.recordset")
rs.open "select * from Users where Id="&request.Cookies("userid")&"",conn,1,3
rs("PassWord")=Pwd
rs("UserName")=UserName
rs("ans")=ans
rs("qus")=qus
rs("Job")=Job
rs("State")=State
rs("city")=city
rs("Tel")=Tel
rs("qq")=qq
rs("Mail")=Mail
rs("Add")=Add
rs("ZipCode")=ZipCode
rs("Sfz")=Sfz
rs.update
rs.close
set rs=nothing
response.Write("<script>alert('修改成功啦！');history.back()</script>")
end if
set rs=conn.execute("select * from users where id="&request.Cookies("userid")&"")
%>
<table width="100%" cellspacing="0" cellpadding="0">
<tr>
<td><table width="801" align="right" cellpadding="0" cellspacing="0">
<tr>
<td width="181" rowspan="2" valign="top"><!--#include file="left.asp" --></td>
<td width="1" bgcolor="#D7D7D7"></td>
<td height="314" valign="top"><!--#include file="body.asp" --></td>
</tr>
<tr>
<td bgcolor="#D7D7D7"></td>
<td height="630" valign="top"><table width="618" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/tt_modify.gif" width="618" height="35"></td>
</tr>
<tr>
<td align="center"><br>
<table width="96%" border="0" cellpadding="3" cellspacing="1" bgcolor="#e7e7e7">
<form name="form1" method="post" action="modify.asp?action=saveedit">
<tr bgcolor="#FFFFFF">
<td width="30%" bgcolor="#f7f7f7"> 用户名</td>
<td><input name="UserId" type="text" id="UserId" value="<%=request.cookies("username")%>" maxlength="20" readonly="1">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 密码</td>
<td><input name="PassWord1" type="password" id="PassWord1" value="<%=rs("password")%>" maxlength="20">
<span style="color: #FF0000">修改密码直接输入新密码</span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 密码提示问题？ </td>
<td><input name="ans" type="text" id="ans" value="<%=rs("ans")%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 密码提示答案</td>
<td><input name="qus" type="text" id="qus" value="<%=rs("qus")%>" maxlength="20">
用于找回用户密码，勿必填写。</td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 联系人</td>
<td><input name="UserName" type="text" id="UserName" value="<%=rs("UserName")%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 联系电话</td>
<td><input name="Tel" type="text" id="Tel" value="<%=rs("Tel")%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 手机</td>
<td><input name="sfz" type="text" id="sfz" value="<%=rs("sfz")%>" maxlength="25"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> E-Mail</td>
<td><input name="Mail" type="text" id="Mail" value="<%=rs("Mail")%>" maxlength="50"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 联系QQ</td>
<td><input name="QQ" type="text" id="QQ" value="<%=rs("qq")%>" maxlength="11"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 公司/单位</td>
<td><input name="job" type="text" id="job" value="<%=rs("job")%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 省份</td>
<td><select name="State" id="State">
<option selected value="<%=rs("State")%>"><%=rs("State")%>
<option value="北京">北京
<option value="天津">天津
<option value="上海">上海
<option value="重庆">重庆
<option value="河北">河北
<option value="山西">山西
<option value="内蒙古">内蒙古
<option value="辽宁">辽宁
<option value="吉林">吉林
<option value="黑龙江">黑龙江
<option value="河南">河南
<option value="新疆">新疆
<option value="江苏">江苏
<option value="浙江">浙江
<option value="山东">山东
<option value="安徽">安徽
<option value="江西">江西
<option value="湖北">湖北
<option value="四川">四川
<option value="云南">云南
<option value="陕西">陕西
<option value="甘肃">甘肃
<option value="青海">青海
<option value="宁夏">宁夏
<option value="西藏">西藏
<option value="广东">广东
<option value="广西">广西
<option value="福建">福建
<option value="湖南">湖南
<option value="海南">海南
<option value="贵州">贵州
<option value="香港">香港
<option value="澳门">澳门
<option value="台湾">台湾
</select>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 城市</td>
<td><input name="city" type="text" id="city" value="<%=rs("city")%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 联系地址</td>
<td><input name="Add" type="text" id="Add" value="<%=rs("add")%>" maxlength="255"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 邮政编码</td>
<td><input name="ZipCode" type="text" id="ZipCode" value="<%=rs("ZipCode")%>" size="10" maxlength="10"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 会员类型</td>
<td><font color=red><%=rs("dj")%></font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 高级用户</td>
<td><%if rs("huser")=0 then%>否<%else%>是<%end if%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> 登录次数</td>
<td><%=rs("num")%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#f7f7f7"> </td>
<td><input type="submit" name="Submit" value="提交" class="btn">
<input type="reset" name="Submit2" value="重置" class="btn"></td>
</tr>
</form>
</table>
</td>
</tr>
</table></td>
</tr>
</table></td>
<td width="1" bgcolor="#D7D7D7"></td>
<td width="206" background="images/right_bg2.gif"> </td>
</tr>
</table>
<!--#include file="end.asp" -->
<!--#include file="ad.asp" -->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -