regcheck.asp

使用Asp+Access+FSO+Jmail+Servu开发

<!--#include file="config.asp"-->
<%
username=request("username")
if filters<>"" then
filters=split(filters,"|")
for i = 0 to ubound(filters)
	if LCase(username)=filters(i) then
		response.write "<script>alert('对不起，此用户名被系统保留或禁用！');location.href='javascript:self.close()'</script>"
		erro=true
		exit for
	end if
next
end if
sql="select * from [user] where username='"&username&"'"
rs.open sql,conn,1,3
if rs.eof then
response.write "<script>alert('恭喜，您还可以注册帐号："&username&"！');</script>"
else
response.write "<script>alert('对不起，帐号："&username&"已经被人注册了！');</script>"
end if
%>