register.asp

来自「数值计算方法网络课件系统是浙江大学过程装备与控制工程专业2001级本科生毕业设计」· ASP 代码 · 共 34 行

<!--#include file="inc/conn.asp"-->
<!--#include file="inc/func.asp"-->
<!--#include file="inc/md5.asp"-->
<!--#include file="inc/sqlin.asp"-->

<%
'**************** 用户注册页面 *************
'* File: register.asp V1.0 2005.05.07
'* Author: wwxbei
'*******************************************

if request.form("issubmit")="yes" then
	DBConnBegin()
	Rs.open "select * from student where studentname='" & cstr(trim(request("studentname"))) & "'",conn,1,1
    if not Rs.BOF and not Rs.EOF then
		GoError "该用户名已经存在!"
	end if
	DBConnEnd()
	DBConnBegin()
	Rs.open "select * from student where id is null",conn,3,3
	Rs.addnew
	Rs("studentname")=cstr(trim(request("studentname")))
	Rs("studentpassword")=md5(trim(request("studentpassword")))
	Rs("number")=cstr(trim(request("studentnumber")))
	Rs.update
	DBConnEnd()
	
	response.write "<p align=center>注册成功，3秒后自动返回前页！<script>window.setTimeout(""location.href='index.html'"",3000);</script></p>"
	response.end
end if

response.write FSOFileRead("html/register.txt")
%>