📄 joinserver.asp

📁 视频点播系统
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="../MD5/md5.asp" -->

<%
if Replace(request("userid"), "'", "''")="" or Replace(request("password"), "'", "''")="" or request("myemail")="" then
response.write "<script>alert('表单未填完整不能注册！');history.back();</Script>"
response.end
end if
email=request("myemail")
if instr(email,"@")=0 or right(email,1)="@" or left(email,1)="@" then
   response.write "<script>alert('email字段错误，请重新输入！');history.back();</Script>"
   response.end
end if
if request("green")=no then
response.write "<script>alert('不接受本站服务条款不能注册！');history.back();</Script>"
response.end
end if
%>
<%
'dim  radpass
set rs=server.createobject("adodb.recordset")
sql="select userid from users where userid='"&Replace(request("userid"), "'", "''")&"' or  email='"&request("myemail")&"' "
rs.open sql,conn,1,2
if not rs.eof then
   response.write "<script>alert('您的“用户名称”已被占用，或者您的EMAIL已注册过了，请重新输入！');history.back();</Script>"
   response.end
end if
dim rs
dim sql1

set rs=server.createobject("adodb.recordset")
sql1="select * from users"
rs.open sql1,conn,1,3

rs.addnew
rs("userid")=Replace(request("userid"), "'", "''")
rs("password")=md5(Replace(request("password"), "'", "''"))
rs("name")=request("name")
rs("Province")=request("Province")
rs("city")=request("city")
rs("adress")=request("adress")
rs("homeaddress")=request("homeaddress")
rs("sex")=request("sex")
rs("phone")=request("phone")
rs("askmejoin")=request("askmejoin")
rs("lasthits")=date()
rs("email")=email
rs("oklook")=0
rs("money")=now()
rs("baoyue")=0
rs("usercount")=0  '注册即获得电影点数，不要的话只要改为0即可！
rs.update

rs.close
set rs=nothing
conn.close
set conn=nothing
response.cookies("userid")=Replace(request("userid"), "'", "''")
response.cookies("password")=md5(Replace(request("password"), "'", "''"))
response.cookies("okerer")="yesok"
application(""&Replace(request("userid"), "'", "''")&"")="yes"
response.cookies("askmejoin")="" %>




<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">
<title>注册成功</title>
<link rel="stylesheet" type="text/css" href="../css/style.css">
</head>

<body bgcolor="#3B591B" text="0" leftmargin="0">
<TABLE width=350 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TR> 
    <TD align="center" class="title">
    <img src="../images/mixtop.gif"   width="350" height="43"></TD>
  </TR>
  <TR> 
    <TD height="27" align="center" background="../images/mediatop2.gif"   class="title"><font size="2"><span lang="zh-cn"><b> 
                      请选择您要购买的会员类型</b></span></font></TD>
  </TR>
  <TR> 
    <TD valign="top" background="../images/mixmediabg.gif"  > <table width="90%" border="0" align="center">
        <tr><br>
                  <td width="100%">
                                    <p align="center">如果您要继续升级会员， 请点下面继续进行购买吧。<br>
            <br>
            希望您会喜欢我们的网站：）<br>
            </font></p>
          </td>
    </tr>
    <tr>
      <td width="400" height="16">
      <form method="POST" action="buy.asp">
        <p align="center"><input class="button1" type="submit" value="下一步进入付费" name="B1">
              　<input type="reset" name="Submit2" value="我不想付费了" class="button1" onclick="window.open('../index.asp','','');self.close();"></p>
                        </div>
                      </form> </td>
            </tr>
      </table></TD>
  </TR>
  <tr> 
    <td><img src="../images/mixend.gif"   width="350" height="54"></td>
  </tr>
</TABLE>

  </center>
</div>

</body>

</html>
⌨️ 快捷键说明

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