📄 modify.asp
字号:
<%@ Language=VBScript %>
<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<% If request.form("username") = "" Then %>
<html>
<head>
<title>资料修改</title>
</head>
<body topmargin="0" background="images/bg.gif">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="760" height="54" style="border-left: 1 solid #000080; border-right: 1 solid #000080">
<tr>
<td height="28" style="border-bottom: 1 dotted #000080">
<p align="center"><font color="#FF0000">是要更新资料了还是忘记密码了，呵呵！</font></p>
</td>
</tr>
<tr>
<td height="41">
<form method="POST" action="modify.asp">
<p align="center">请输入你的<font color="#FF0000">名字</font>：<input type="text" name="username" size="20" style="border: 1 dotted #000080">
请输入你的<font color="#FF0000">密码</font>：<input type="password" name="userpassword" size="20" style="border: 1 dotted #000080">
<input type="submit" value="修改资料" name="submit" style="font-size: 9pt; height: 19; width: 52; color: #E0E0E0; background-color: #006898; border: 2 solid #3399FF" onMouseOver ="this.style.backgroundColor='#ff0000'" onMouseOut ="this.style.backgroundColor='#006898'">
<a href="index.asp" style="font-size: 9pt; height: 19; width: 52; color: #E0E0E0; background-color: #006898; border: 2 solid #3399FF" onMouseOver ="this.style.backgroundColor='#ff0000'" onMouseOut ="this.style.backgroundColor='#006898'">以后再说</a></p>
</td>
</form>
</tr>
<tr>
<td height="17">
<p align="center"></td>
</tr>
<tr>
<td height="36">
<form method="POST" action="serachpass.asp">
<p align="center">请输入你注册时的<font color="#FF0000">网名</font>，密码会<font color="#FF0000">自动发送到你注册时的信箱</font>里：<input type="text" name="usernichen" size="20" style="border: 1 dotted #000080">
<input type="submit" value="找回密码" name="submit1" style="font-size: 9pt; height: 19; width: 52; color: #E0E0E0; background-color: #006898; border: 2 solid #3399FF" onMouseOver ="this.style.backgroundColor='#ff0000'" onMouseOut ="this.style.backgroundColor='#006898'">
<a href="index.asp" style="font-size: 9pt; height: 19; width: 52; color: #E0E0E0; background-color: #006898; border: 2 solid #3399FF" onMouseOver ="this.style.backgroundColor='#ff0000'" onMouseOut ="this.style.backgroundColor='#006898'">以后再说</a>
</p>
</td>
</form>
</tr>
<tr>
<td height="18">
</td>
</tr>
</table>
</center>
</div>
</body>
</html>
<!--#include file="down.asp"-->
<%
else
username=Request.form("username")
password=request.form("userpassword")
'检测用户名称和密码
If request.form("username")="" or request.form("userpassword")="" Then
response.write"<script language='javascript'>alert('错误，请重新正确输入！')</script>"
response.write"<center><a href=# onclick='history.go(-1)'><font size=2 color=#ff0000>请点击返回</font></a></center>"
response.end
Else
SQL="select * from myclass where name='"+Request.form("username")+"'"
'索检用户的名称，然后对照密码是否正确
rs.open SQL,conn,1,3
if rs.eof and rs.bof then
response.write "<script language='javascript'>" & chr(13)
response.write "alert('你还没有注册呢！');" & Chr(13)
response.write "window.document.location.href='reg.asp';"&Chr(13)
response.write "</script>" & Chr(13)
response.end
end If
If trim(request.form("userpassword"))<>trim(rs("password")) or trim(rs("password"))="" or trim(request.form("userpassword"))="" Then
response.write"<script language='javascript'>alert('密码错了，忘了吗？')</script>"
response.write"<center><a href=# onclick='history.go(-1)'><font size=2 color=#ff0000>请点击返回</font></a></center>"
response.end
Else
Session("username") =rs("name")
Session("password") =rs("password")
session("logined")=true
response.write "<script language='javascript'>" & chr(13)
response.write "window.document.location.href='useredit.asp?id="&rs("id")&"';"&Chr(13)
response.write "</script>" & Chr(13)
End If
rs.close
End if
ENd if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -