📄 regpost.asp
字号:
<%PageName="UserRegPost"%>
<!--#include file="conn.asp"-->
<!--#include file="functionuser.asp"-->
<!--#include file="Star.INC"-->
<!--#include file="md5.asp"-->
<script language="jscript.encode" src=../js/top.txt></script>
<%
founderr=false
if request.form("UserName")="" or len(request.form("UserName"))>20 then
errmsg=errmsg+""+"用户名输入错误(未输入或长度超过了20个字节)。<br>"
founderr=true
else
UserName=trim(request.form("UserName"))
end if
if request.form("password")="" or Len(request.form("password"))>20 then
errmsg=errmsg+""+"请输入您的密码(长度不能大于20)。<br>"
founderr=true
else
password=request.form("password")
end if
if password<>request("password2") then
errmsg=errmsg+""+"您输入的密码和确认密码不一致。"
founderr=true
end if
if IsValidEmail(trim(request.form("Email")))=false then
errmsg=errmsg+""+"您的Email有错误。"
founderr=true
else
Email=trim(request.form("Email"))
end if
if request.form("youbian")="" or Len(request.form("youbian"))<6 then
errmsg=errmsg+""+"你的邮政编码有误，请查证后重新输入。<br>"
founderr=true
else
youbian=request.form("youbian")
end if
if request.form("OICQ")="" or Len(request.form("OICQ"))<5 then
errmsg=errmsg+""+"你的OICQ号码有误，请查证后重新输入。<br>"
founderr=true
else
oicq=request.form("oicq")
end if
if founderr=true then
call error()
else
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where username='"&username&"'"
rs.open sql,conn,1,3
if not rs.eof or username=WebName then
errmsg=""+"对不起，您输入的用户名已经被注册，请重新输入。"
founderr=true
else
rs.addnew
rs("username")=username
rs("password")=md5(password)
rs("email")=email
rs("oicq")=oicq
rs("loginDate")=NOW()
rs("loginIP")=Request.ServerVariables("REMOTE_ADDR")
rs("vipdate")=request.form("vipdate")
if request.form("Address")<>"" then rs("Address")=request.form("Address")
if request.form("Tel")<>"" then rs("Tel")=request.form("Tel")
if request.form("Sex")<>"" then rs("Sex")=request.form("Sex")
if request.form("Youbian")<>"" then rs("Youbian")=request.form("Youbian")
if request.form("Name")<>"" and request.form("Shenfenzheng")<>"" then
rs("Name")=request("Name")
rs("Shenfenzheng")=request("Shenfenzheng")
end if
rs("addDate")=NOW()
rs.update
end if
rs.close
if founderr=true then
call error()
else
%>
<div align="center">
<center>
<table width="770" border="0" align="center" cellpadding="0" cellspacing="4" bgcolor="#FFFFFF">
<tr>
<td><table width="640" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/reg_019.gif" width="640" height="81"></td>
</tr>
<tr>
<td valign="top" bgcolor="#CCCCCC"><img src="images/1x1.gif" width="1" height="1"></td>
</tr>
<tr>
<td valign="top" bgcolor="eeeeee"><img src="images/4x4.gif" width="4" height="4"></td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="1" cellpadding="4">
<tr>
<td width="21%" height="25" bgcolor="FFEFB5"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
<font color="#FF0000">注册帐号：</font> </td>
<td width="79%" bgcolor="#F0F0F0"><%=username%> </td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
登录密码：</td>
<td bgcolor="#F0F0F0"><%=password%> </td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
电子邮件：</td>
<td bgcolor="#F0F0F0"><%=Email%></td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
会员类型：</td>
<td bgcolor="#F0F0F0"><%=request.form("vipdate")%>天会员
</td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
您的性别：</td>
<td bgcolor="#F0F0F0"><%=request.form("Sex")%> </td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
真实姓名：</td>
<td bgcolor="#F0F0F0">
<%if request.form("Name")="" then%>
未填写
<%else%>
<%=request.form("Name")%>
<%end if%>
</td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
身份证号：</td>
<td bgcolor="#F0F0F0">
<%if request.form("Shenfenzheng")="" then%>
未填写
<%else%>
<%=request.form("Shenfenzheng")%>
<%end if%>
</td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
联系电话：</td>
<td bgcolor="#F0F0F0">
<%if request.form("Tel")="" then%>
未填写
<%else%>
<%=request.form("Tel")%>
<%end if%>
</td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
详细地址：</td>
<td bgcolor="#F0F0F0">
<%if request.form("Address")="" then%>
未填写
<%else%>
<%=request.form("Address")%>
<%end if%>
</td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
邮政编码：</td>
<td bgcolor="#F0F0F0">
<%if request.form("Youbian")="" then%>
未填写
<%else%>
<%=request.form("Youbian")%>
<%end if%>
</td>
</tr>
<tr>
<td height="25" bgcolor="FFF7CE"><img src="images/ic_table01.gif" width="12" height="7" align="absmiddle">
OICQ号码：</td>
<td bgcolor="#F0F0F0">
<%if request.form("Oicq")="" then%>
未填写
<%else%>
<%=request.form("Oicq")%>
<%end if%>
</td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="43" align="center" bgcolor="#FFFFFF"> <p><font color="#FF6600"><br>
会员申请成功 以上为您的注册信息 请牢记！</font></p>
<p><a href="index.asp"><font color="#FF6600"><strong>现在就去登陆！</strong></font></a></p>
</td>
</tr>
</table></td>
</tr>
</table>
</center>
</div>
<script language="jscript.encode" src=../js/end.txt></script>
<%
end if
set rs=nothing
end if
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -