registerdo.asp

ASP+SQL Server动态网站开发从基础到实践教程

<!--#include file="config.asp" -->
<%
varUsername = request("txtUsername")
varPassword = request("txtPassword")

'检查用户名是否存在
call openDB
rs.Open "SELECT * FROM USERS WHERE Username = '" & varUsername & "';", conn, 0, 1


if rs.EOF then
	call closeDB
	
	call writeDB("INSERT INTO USERS([Username], [Password]) VALUES('" & varUsername & "', '" & varPassword & "');")
	'返回到登录界面
	response.redirect("home.asp?Status=Registered")
else
	call closeDB
	response.write "该用户名已经存在，请换一个！"
end if
%>