jiancha_userreg.asp

本学期要实讯

<!--#include file="odbc_connection.asp"-->
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.style5 {font-size: 12px; color: #333333; }
.style6 {	font-size: 12px;color: #0099FF;}
-->
</style>
<%
dim user,psw1,psw2,ask,daan,main,shenfen
user=Trim(Request("user"))
psw1=Request("psw1")
psw2=Request("psw2")
ask=Request("ask")
daan=Request("daan")
main=Request("mail")
shenfen=Request("radiome")
%>
<table width="760" height="331" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="93" align="left" valign="top" background="images/bbg.jpg"><!--#include file="top.asp"--></td>
  </tr>
  <tr>
    <td height="58" align="center" valign="middle" background="images/bbg.jpg">
		<%dim rsb,sqlb
sqlb="select user from login where user='"&user&"'"
set rsb=db.execute(sqlb)
if rsb.bof and rsb.eof then %>
<%if len(trim(psw1))<6 or len(trim(psw1))>25  then%>
<table width="581" height="29" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" class="style5">对不起，你输入的密码格式不正确！&nbsp;&nbsp; <a href="user_reg.asp">返回</a></td>
      </tr>
    </table>
<%else%>
<%if psw1<>psw2 then %>
<table width="581" height="29" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" class="style5">对不起，输入两次密码不一致！&nbsp;&nbsp; <a href="user_reg.asp">返回</a></td>
      </tr>
    </table>
<%else%>
<%dim rsa,sqla
sqla="select mail from login where mail='"&main&"'"
set rsa=db.execute(sqla)
if rsa.bof and rsa.eof then %>
<%dim rs,sql
sql="insert into login(user,psw1,psw2,ask,daan,mail,body,log_date) values('"&user&"','"&psw1&"','"&psw2&"','"&ask&"','"&daan&"','"&main&"','"&shenfen&"',#"&date()&"#) "
db.execute(sql)
if Request("user")<>""  then%>
<table width="581" height="29" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" class="style5">你的信息注册成功！&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 返回首页登录：<a href='index.asp'>返回</a></td>
      </tr>
    </table>
<% end if%>

<%else%>
	<table width="581" height="29" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" class="style5">对不起，此邮箱已经被注册过了，请你选择别的邮箱，或者检查自己的邮箱是否正确！ <a href="user_reg.asp">返回</a></td>
      </tr>
    </table>
	<%end if%>
	<%end if%>
	<%end if%>
<%else%>
	<table width="581" height="29" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" class="style5">对不起，此用户名已经被注册过了，请你选择别的用户名 &nbsp;&nbsp; <a href="user_reg.asp"> 返回</a></td>
      </tr>
    </table>
	<%end if%>	
	
	</td>
  </tr>
  <tr>
    <td height="98" align="center" valign="top"></td>
  </tr>
</table>