📄 regchk_2.asp
字号:
<!--#include file=conn.asp-->
<!--#include file=err.asp-->
<!--#include file=ipt.asp-->
<!--#include file=mail.asp-->
<!--#include file=md5.asp-->
<!--#include file="config.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>会员注册</title>
<link rel="stylesheet" type="text/css" href="1.CSS">
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-bottom: 0px;
}
-->
</style></head>
<%
dim username,password,name,idcard,Sex,dianhua,youbian,dizhi,email,ask,answer
dim rs,sql
username=trim(request("username"))
password=trim(request("password"))
ask=trim(request("ask"))
answer=trim(request("answer"))
email=request("email")
name=trim(request("name"))
idcard=trim(request("idcard"))
Sex=trim(request("Sex"))
dianhua=trim(request("dianhua"))
youbian=trim(request("youbian"))
dizhi=trim(request("dizhi"))
if dizhi="" or name="" or idcard="" or dianhua="" or youbian="" then
call errijob(4)
response.end
end if
chkijob(username)
chkijob(name)
if nothaveChinese(username)=false then
call errijob(3)
response.end
end if
if IsValidemail(email)=false then
call errijob(1)
response.end
end if
if not isnumeric(youbian) or len(youbian)<>6 then
call errijob(5)
response.end
end if
if not isnumeric(idcard) or len(idcard)<15 or len(idcard)>18 then
call errijob(6)
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where username='"&username&"'"
rs.open sql,conn,1,3
if rs.eof or rs.bof then
rs.addnew
rs("username")=username
rs("password")=password
rs("name")=name
rs("ask")=ask
rs("answer")=answer
rs("email")=email
rs("idcard")=idcard
rs("Sex")=Sex
rs("dianhua")=dianhua
rs("youbian")=youbian
rs("dizhi")=dizhi
rs("zcdata")=now()
rs("a")=z_a
rs("b")=z_b
rs("c")=z_c
rs("d")=z_d
rs("jf")=jf_1
rs("hb")=z_hb
rs.update
%>
<body>
<table width="500" height="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#111111" bgcolor="#EEEEEE" style="border-collapse: collapse">
<tr>
<td width="768" height="227">
<div align="center">
<center>
<table width="489" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td width="16"> </td>
<td width="456"> </td>
<td width="17"> </td>
</tr>
<tr>
<td width="16">
</td>
<td width="456" bgcolor="#FFFFFF">
<table width="454" height="120" border="1" cellpadding="3" cellspacing="3" bordercolor="#CCCCCC" class="greyfont">
<tr>
<td height="19" bgcolor="#F5F5F5" width="454">
<p align="center" style="line-height: 200%; margin-top: 0; margin-bottom: 0">恭喜<%=name%>！<b><font color="#FF0000">注册成功了！</b></font></td>
</tr>
<tr>
<td height="19" bgcolor="#F5F5F5" width="454">
<li>
<p align="center"> 我们同时将密码发送到了|<b><font color=""#ff0000""><%=email%></b>|，请保管好您的密码</p>
<table class="font_10_e_black" cellspacing="0" cellpadding="3" width="98%" align="center" border="0">
<!---------------------->
</table>
<table class="font_10_e_black" cellspacing="3" cellpadding="3" width="98%" align="center" border="0">
<form id="f1" name="thisForm" action="Loginchk.asp" method="POST">
<tr>
<td width="48%">
<p align="center"> 登陆帐号:
</td>
<td width="52%">
<input style="BACKGROUND-COLOR: #eeeeee; BORDER-BOTTOM: #FFFFFF 1px solid; BORDER-LEFT: #a2a2a2 1px solid; BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #a2a2a2 1px solid; COLOR: #333333; FONT-SIZE: 9pt; HEIGHT: 19px;" class="form_e_10_black" id="username" maxlength="20" size="10" name="username" value="<%=username%>">
</td>
</tr>
<tr>
<td>
<p align="center"> 登陆密码:
</td>
<td>
<input style="BACKGROUND-COLOR: #eeeeee; BORDER-BOTTOM: #FFFFFF 1px solid; BORDER-LEFT: #a2a2a2 1px solid; BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #a2a2a2 1px solid; COLOR: #333333; FONT-SIZE: 9pt; HEIGHT: 19px;" class="form_e_10_black" id="password" maxlength="32" size="10" value="<%=password%>" name="password">
</td>
</tr>
<tr>
<td> </td>
<td>
<input name="I3" type="submit" style="BACKGROUND-COLOR: #eeeeee; BORDER-BOTTOM: #a2a2a2 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #a2a2a2 1px solid; BORDER-TOP: #ffffff 1px solid; COLOR: #333333; FONT-SIZE: 9pt; HEIGHT: 19px;" value="点击登陆" border="0">
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
</td>
<td width="17">
</td>
</tr>
<tr>
<td width="16"> </td>
<td width="456"> </td>
<td width="17"> </td>
</tr>
</table>
</center>
</div> </td>
</tr>
</table>
<%
call mail()
else
if trim(rs("email"))=email then
call errijob(23)
response.end
end if
if trim(rs("username"))=username then
call errijob(22)
response.end
end if
call errijob(24)
response.end
end if
sub mail()
dim mailbody,Jmail
mailbody="恭喜你成为<a href="&web&">"&title&"</a>的尊敬会员！<br>你的登陆帐号："&username&"<br>你的登陆密码："&password&"<br><br>登陆地址为：<a href="&web&">"&web&"</a>"
end sub
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -