📄 updateuserinfor.asp
字号:
<!--#include file ="../include.asp"-->
<%
StartPage "修改用户信息页",2
%>
<!--<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>修改用户信息首页</TITLE>
</HEAD>
<BODY leftmargin=150 rightmargin=150 topmargin=30>
<IMG border=0 src="../images/title.JPG">
<hr>
<br>
-->
<%
OldUserName = session("UserName")
UserName = session("UserName")
set conn = Server.CreateObject ("adodb.connection")
conn.Open "NetExamine","sa",""
set userconn = Server.CreateObject ("adodb.recordset")
sqlstr = "select * from 用户表 where 用户名 = '" &UserName& "'"
userconn.Open sqlstr,conn
%>
<form name ="Next" method ="post" action ="">
<table width="90%"
align=center border=1 bordercolor=lightskyblue cellpadding="0" cellspacing="0" style="BORDER-COLLAPSE: collapse">
<tr>
<td height=20 bgcolor=lightskyblue></td>
</tr>
<tr>
<td height=200 align=middle>
<table width="90%">
<tr>
<td align=middle colspan=2><font size= 6 color=lightskyblue>用户信息修改页</font></td>
</tr>
<tr>
<td colspan=2><b><font size=5 color=lightskyblue>修改流程</font></b></td>
</tr>
<tr>
<td align=center><b><font size=5 color=lightskyblue>填写内容</font></b></td>
<td align=center>用 户 名：<input type ="text" name =UserName value = <% =userconn.Fields("用户名")%>></td>
</tr>
<tr>
<td>
<%
m_strName = "<input type = hidden name = OldUserName value = "+OldUserName+">"
Response.Write (m_strName)
%>
</td>
<td align=center>密 码：<input type ="password" name =PassWord value = <% = userconn.Fields("密码")%>></td>
</tr>
<tr>
<td></td>
<td align=center>确认密码：<input type ="password" name =CheckPassWord value = <% = userconn.Fields("密码")%>></td>
</tr>
<tr>
<td align=center></td>
<td align=center>提示问题：<input type ="text" name =Question value = <% = userconn.Fields("提示问题")%>></td>
</tr>
<tr>
<td align=center><b><font size=5 color=lightskyblue>确认修改</font></b></td>
<td align=center>提示答案：<input type ="text" name =Answer value = <% = userconn.Fields("提示答案")%>></td>
</tr>
<tr>
<td></td>
<td align=center>所学专业：<input type ="text" name =Specialty value = <% = userconn.Fields("专业")%>></td>
</tr>
<tr>
<td></td>
<td align=center>联系电话：<input type ="text" name =TeletePhone value = <% = userconn.Fields("联系电话")%>></td>
</tr>
<tr>
<td></td>
<td align=center>联系邮箱：<input type = "text" name =Email value = <%=userconn.Fields("联系邮箱")%>></td>
</tr>
<tr>
<td align=middle colspan=2 height=15><td></td>
<tr>
<td></td>
<td align=middle><input type ="button" value ="修改信息" onclick ="Check()"> <input type ="reset" value ="重填"></td>
</tr>
<tr>
<td align=middle colspan=2 height=15><td></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height=20 bgcolor=lightskyblue></td>
</tr>
</table>
</form>
<%
userconn.Close()
set userconn = nothing
conn.Close()
set conn = nothing
%>
<!--
<br>
<hr>
<center>
<font size=2>
欢迎来到本网站，最佳分辨率：800×600
<br>如果有困难请与我联系：FD_FYY@hotmail.com
</font></center>
</BODY>
</HTML>
-->
<%
EndPage
%>
<script language="javascript">
function Check()
{
if (document.Next.UserName .value=="")
{
alert("用户名不能为空");
return;
}
if (document.Next.PassWord.value =="")
{
alert("密码不能为空");
return;
}
if (document.Next.CheckPassWord.value =="")
{
alert("确答密码不能为空");
return;
}
if (document.Next.Question.value == "")
{
alert("提示问题不能为空");
return;
}
if (document.Next.Answer.value =="")
{
alert("提示回答不能为空");
return;
}
if (document.Next.Specialty.value == "")
{
alert("专业不能为空");
return;
}
if (document.Next.TeletePhone.value =="")
{
alert("联系电话不能为空");
return;
}
if (document.Next.Email.value =="")
{
alert("联系邮箱不能为空");
return;
}
if (document.Next.PassWord.value != document.Next .CheckPassWord .value)
{
alert("两次输入的密码不一样");
return;
}
else
{
document.Next.action= "UpdataUserInfor_Second.asp";
document.Next.submit();
}
}
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -