📄 zhuce2.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<html>
<body>
<!--#include file="top.asp"-->
<div align=center>
<%
If Trim(Request("username"))="" or Trim(Request("usernum"))="" or Request.form("password")="" Then
Response.Write("对不起，姓名，学号和密码不能为空！")
%>
<p>
<div align=center>请点<a href="zhuce1.asp">这里</a>返回</div>
<p>
<!--#include file="down.asp"-->
<%
Response.End
End IF
%>
</div>
<div align=center>
<%
If Request.form("password")<>Request.form("password1") Then
Response.Write("对不起，您两次输入的密码不符！")
%>
<p>
<div align=center>请点<a href="zhuce1.asp">这里</a>返回</div>
<p>
<!--#include file="down.asp"-->
<%
Response.End
End IF
%>
</div>
<%
fs="Select * from login"
Set rs=Server.CreateObject("Adodb.Recordset")
rs.open fs,conn,1,1
%>
<%If not rs.eof Then%>
<%Do While not rs.eof%>
<div align=center>
<%
If Trim(Request("usernum"))=rs("usernum") Then
Response.Write("对不起，该用户已注册！")
%>
</div>
<p>
<div align=center>请点<a href="zhuce.asp">这里</a>返回</div>
<p>
<!--#include file="down.asp"-->
<%
Response.End
End IF
%>
<%rs.movenext%>
<%loop%>
<%End If%>
<%
zhuce_name=Trim(Request("username"))
zhuce_num=Trim(Request("usernum"))
zhuce_password=Request.form("password")
%>
<%
ts="Insert Into login(username,usernum,userpassword)values('"+zhuce_name+"','"+zhuce_num+"','"+md5(zhuce_password,16)+"')"
conn.execute ts
conn.close
set conn=nothing
%>
<div align=center><%Response.Write("恭喜您，注册成功！")%></div>
<p>
<div align=center>请您点<a align=center href="zhuce.asp">这里</a>登录</div>
<br>
<!--#include file="down.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -