📄 regcheck.asp
字号:
<%
'########################################
'
'XinYou-pK(CMS)(v1.0)拼客内容管理系统
'
'使用过程中,如有问题,请联系QQ:16129825 E-mail:liuxing99@tom.com
'
'演示地址：http://www.XinYou88.net
'
'程序简单易用,基本设置都有后台设置,不需要专业的知识就可以建立一个拼客网站
'
'如有BUG,请通知一声,谢谢!!!
'
'########################################
%>
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="inc/conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>注册成功!</title>
</head>
<body>
<%
If Trim(Request.Form("validatecode"))=Empty Or Trim(Session("cnbruce.com_ValidateCode"))<>Trim(Request.Form("validatecode")) Then
response.write "<script language='javascript'>alert('请输入正确的验证码');history.back();</script>"
response.end
end if
dim rs,sql
username = request("name")
pwd = request("pwd")
username = replace(username,"'","")
pwd = replace(pwd,"'","")
email=trim(request("email"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from [user] where name='"&username&"'or email='"&email&"'"
rs.open sql,conn,1,3
if rs.eof then
rs.addnew
rs("name")=username
rs("pwd")=pwd
rs("email")=trim(request("email"))
rs("zcsj")=now()
rs("dlcs")=1
rs("zhdl")=now()
rs("zhip")=request.serverVariables("remote_host")
rs.update
response.cookies("xinyou88")("domain")=Request.ServerVariables("SERVER_NAME")
response.cookies("xinyou88")("user")=username
response.cookies("xinyou88")("password")=pwd
Response.Write "<script language='javascript'>alert('恭喜,注册成功!');</script>"
response.write "<meta http-equiv=refresh content=""0;URL=user.asp"">"
response.End
else
if rs("name")=username then
response.write "<script lanaguage='javascript'>alert('用户名已被注册,请重新选择用户名');history.back();</script>"
response.End
end if
if rs("email")=email then
response.write "<script lanaguage='javascript'>alert('该邮件已被注册了!');history.back();</script>"
response.End
end if
end if
rs.close
set rs=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -