📄 reg.asp

📁 一个网上flash网站源码
💻 ASP
字号:
<!--#include file="config.asp"-->
<%
if request("type")="save" then
if webreg<>"1" then
response.write("<script>alert('错误：暂停注册新帐号!');history.go(-1)</script>")
response.end
end if
server_vv=len(Request.ServerVariables("SERVER_NAME"))
server_v1=left(Cstr(Request.ServerVariables("HTTP_REFERER")),server_vv)
server_v2=left(Cstr("http://"&Request.ServerVariables("SERVER_NAME")),server_vv)
if server_v1<>server_v2 and server_v1<>"" and server_v2<>"" then
response.write("<script>alert('错误：禁止从站点外部提交数据!.')</script>")
response.end
end if

if len(qm)>250 then
response.write("<script>alert('错误:个性签名多于250个字符!');history.go(-1)</script>")
response.end
end if

if request.form("user")="" or request.form("pwd1")="" or request.form("pwd2")="" or request.form("email")="" then
response.write("<script>alert('错误：带*号的不能为空!');history.go(-1)</script>")
response.end
end if

if request.form("pwd1")<>request.form("pwd2") then
response.write("<script>alert('错误：两次输入密码不相同!');history.go(-1)</script>")
response.end
end if
%>
<!--#include file="mdb_path_user.asp"-->
<!--#include file="char.inc"-->
<%
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select * from UserInfo where user='"&request("user")&"'",conn,1,1
if not rs.eof then
rs.close
set rs=nothing  
conn.close  
set conn=nothing
response.write("<script>alert('错误：用户名已存在,请改名!');history.go(-1)</script>")
response.end
end if
rs.close

rs.open "select * from UserInfo where (id is null)",conn,1,3
rs.addnew
  rs("user")=request("user")
  rs("pwd")=request("pwd1")
rs("qm")=htmlencode(request("qm"))
  rs("sex")=request("sex")
  rs("oicq")=htmlencode(request("oicq"))
  rs("email")=htmlencode(request("email"))
  rs("face")=htmlencode(request("face"))
  if webreglock="1" then
    rs("lock")=1
    mgs="默认新注册帐号为锁定状态!"
  end if
rs.update
rs.close
set rs=nothing  
conn.close  
set conn=nothing
response.write("<script>alert('成功：注册帐号完成,请点击确定进入登陆页面!("&mgs&")');location.href='login.asp'</script>")
response.end
end if
%>
<html>

<head>
<title>MyFlash - www.myFlash.Net</title>
<LINK rel="stylesheet" href="../style.css">
</head>

<body topmargin="0">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="760">
  <tr>
    <td width="100%"><%if webreg<>"1" then%>
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
      <tr>
        <td width="100%" align="center">Sorry！站长已禁止新用户注册！<p>
        如有问题，请联系管理员：<a href="mailto:ygs@myflash.cn">ygs@myflash.cn</a></td>
      </tr>
    </table><%else%><form action="reg.asp" method="post">
<input type="hidden"  name="type" value="save">
  <table border="0" cellspacing="1" style="border-collapse: collapse" width="500" bgcolor="#F2F1E6" cellpadding="5">
    <tr>
      <td width="100%" bgcolor="#F2F1E6"><b>MyFlash中国区 会员帐号注册</b></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">      
      用户名：<input name="user" size="15" style="border-style: solid; border-width: 1">
      <font color="#4D9CC8">*</font><font color="#808080"> 不能有空格,只能有字母/数字或 - _</font></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">登陆密码：<input name="pwd1" size="15" style="border-style: solid; border-width: 1" type="password">
      <font color="#4D9CC8">*</font><font color="#808080">设置您的密码</font></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">确认密码：<input name="pwd2" size="15" style="border-style: solid; border-width: 1" type="password"><font color="#808080"> </font>
      <font color="#4D9CC8">*</font><font color="#808080">同上</font></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">性别：<select size="1" name="sex">
      <option selected value="男">男</option>
      <option selected value="女">女</option>
      </select>
</td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">头像：<select size="1" name="face">
<option<%if face="0" then%> selected<%end if%> selected value="0">0</option>
      <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option></select> <font color="#808080">代号请看:[</font><a target="_blank" href="face.asp">头像列表</a><font color="#808080">]</font> “0”为没有头像！</td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">OICQ：<input name="oicq" size="15" style="border-style: solid; border-width: 1"></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">E-Mail：<input name="email" size="32" style="border-style: solid; border-width: 1">
      <font color="#4D9CC8">*</font></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#FFFFFF">个性签名：<textarea rows="3" name="qm" cols="31" style="border-style: solid; border-width: 1"></textarea><font color="#808080">250字符内</font></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="#F2F1E6">      
      <p align="center">      
      <input name="b1" type="submit" value="提交">&nbsp;      
      <input name="b2" type="reset" value="清空"></p>
     </td>     
    </tr>
  </table>
</form>
<%end if%></td>
  </tr>
  <tr>
    <td width="100%" hight="30" class="p1"><li>会员新增，作 品发布功能！[03-08-5]<li>会员新增，作 品发送功能！[03-07-14]<li>会员新增，作 品点评功能！[03-07-17]<li>会员头像功能以可用！[03-07-27]</td></tr>
</table>
<p><font color="#4D9CC8">现在免费注册MyFlash会员，享受我们给您带来的更多服务！</font></p>
　</body>
<hr width="760" size="1">
<script language=javascript src=../js/copyright.js></script></html>
💿 文件大小 2915 K
👤 上传用户 jccg1000146752
📂 所属分类其他
🏷️ 相关标签

#flash #网站 #源码
⌨️ 快捷键说明

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