registercheck.asp

来自「在 要要要在在 要要要在在 要要要在在 要要要在在 要要要在在 要要要在在 要要」· ASP 代码 · 共 37 行

ASP
37
字号
<!-- #include file="conn.asp"-->
<%
Customer=request.form("Customer")
sql="select * from user where Customer='"&Customer&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
if not rs.eof then
response.write "<script language=javascript>alert('对不起,此账号已经注册!');history.go(-1);</script>"
response.end
end if
if request.form("Password")<>request.form("Password1") then
response.write "<script language=javascript>alert('两次密码输入不一致,请重新输入!');history.go(-1);</script>"
response.end
end if
rs.addnew
rs("Customer")=request.form("Customer")
rs("Password")=request.form("Password")
rs("xm")=request.form("xm")
rs("xb")=request.form("xb")
rs("tell")=request.form("tell")
rs("email")=request.form("email")
lx="包月会员"
rs("lx")=lx
rs.update
set rs=nothing

%>
<html>
<head>
<meta http-equiv="refresh" content="0; url=index.asp">
<title>无标题文档</title>
</head>

<body>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?