⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 member_vip.asp

📁 电影ASP文件
💻 ASP
字号:
<!-- #include file="user_session.asp" -->
<!-- #include file="../set_url.asp" -->
<!--#include file="../film_conn.asp"-->
<HTML><HEAD><TITLE><%=webname%>--会员管理中心--VIP专区</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
</HEAD>
<script language=javascript>
<!--
var boodschap = '<%=set_ie%>';
function dgstatus()
{
window.status = boodschap;
timerID= setTimeout("dgstatus()", 60);
}

function News_Window(theURL,winName,features) {
window.open(theURL,winName,features);
}
//-->
</script>
<BODY bgColor=#71757b leftMargin=0 topMargin=0 rightMargin=0 marginheight="0" marginwidth="0" botmargin="0">
<!--#include file="../top.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center background=../images/bg-content.gif border=0 valign="top">
  <TBODY>
  <TR>
    <TD width=778 height=1>
      <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 height=1 
      cellSpacing=0 cellPadding=0 width=778 align=left border=0 valign="top">
        <TBODY>
  <TR>
    <TD width=778 height=188>
      <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 cellSpacing=0 
      cellPadding=0 width=778 border=0>
        <TBODY>
        <TR>
          <TD width=15 height=151> </TD>
          <TD vAlign=top width=194 height=151><!--#include file="../left1.asp"--></TD>
          <TD vAlign=top width=4></TD>
          <TD vAlign=top width=550 height=151>
            <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 
            cellSpacing=5 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD vAlign=top width="100%" height=386>
                  <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 
                  height=246 cellSpacing=0 cellPadding=0 width="91%" border=0>
                    <TBODY>
                    <TR>
                      <TD vAlign=top width="100%" height=39><!--#include file="../query.asp"--></TD></TR>
                    <TR>
                      <TD width="100%" height=5></TD></TR>
                    <TR>
                      <TD width="100%" height=8></TD></TR>
                    <TR>
                      <TD width="100%" height=5></TD></TR>
                    <TR>
                      <TD width="100%" height=3>
                      <IMG height=21 
                        src="../images/b.gif" width=538 border=0></TD></TR>
                    <TR>
                      <TD width="100%" background=../images/b01.gif height=465 valign="top">
                      <div align="center">
                        <center>
                        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="98%" id="AutoNumber1">
                          <tr>
      <td height="30" bgcolor="#F6F6F6" style="font-size: 12px">
      <p align="center" style="FONT-SIZE: 12px"><b>欢迎您进入VIP会员专区!</b></td>
                                </tr>
                          <tr>
                    <td height="28" style="font-size: 12px">
                    <div align="center">
                      <center>
                      <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber2">
                        <tr>
                          <td width="100%"> <div align="center">
        <center>
<%  
if request.cookies("userid")="" and request.cookies("password")="" and request.cookies("okerer")="" then
session("loginurl")=request.servervariables("url") 
response.redirect "user_login.asp"
end if
set rs=server.createobject("adodb.recordset")
sql="select * from users where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'"
rs.open sql,conn,1,1%> 
<%if rs("oklook")=0 then 
oklook="电影游客"
elseif rs("oklook")=1 then
oklook="普通会员"
elseif rs("oklook")=2 then
oklook="白银会员"
elseif rs("oklook")=3 then
oklook="黄金会员"
elseif rs("oklook")=4 then
oklook="钻石会员"
end if
money=rs("money")
%>
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="85%" id="AutoNumber3">
          <tr>
            <td width="100%" height="30"><hr color="#C0C0C0" size="1"></td>
          </tr>
          <tr>
            <td width="100%" height="25">您的帐号:<font color="#cc0000"><b><%=request.cookies("userid")%></b></font>&nbsp;&nbsp;&nbsp;会员等级:<font color="#cc0000"><b><%=oklook%></b></font>&nbsp;&nbsp;&nbsp;剩余天数:<font color="#cc0000"><b>
<%
if money-now()>=1 then
canlook=money-now()
canlook=formatnumber(canlook,1)
%>
<%=canlook%><%else%>0<%end if%></b></font> 天 </td>
          </tr>
          <tr>
            <td width="100%" height="30"><hr color="#C0C0C0" size="1"></td>
          </tr><%if rs("oklook")>=3 and money-now()>=1 then%>
          <tr>
            <td width="100%" height="30">欢迎您进入VIP专区,以下是VIP专区各版块地址,请点击进入:</td>
          </tr>
          <tr>
            <td width="100%" height="30"><br>
            <a href="http://www.zhaozhao.com//mtype.asp?typeid=性教育" target="_blank">
            http://www.zhaozhao.com//mtype.asp?typeid=性教育</a><br>
            <br>
            <a href="http://www.zhaozhao.com//mtype.asp?typeid=伦理片" target="_blank">
            http://www.zhaozhao.com//mtype.asp?typeid=伦理片</a><br>
            <br>
            <a href="http://www.zhaozhao.com//mtype.asp?typeid=写真集" target="_blank">
            http://www.zhaozhao.com//mtype.asp?typeid=写真集</a><br>
 </td>
          </tr><%else%>
          <tr>
            <td width="100%" height="40">对不起,您不是黄金会员或者您的剩余天数为0,不能进入VIP专区。<br>
            <br>
            <a target="_blank" href="user_pay.asp"><font color="#CC0000">请您先续费成为黄金会员>></font></a></td>
          </tr><%end if%>
          <tr>
            <td width="100%" height="30"> </td>
          </tr>
        </table>
        </center>
      </div></td>
                        </tr>
                      </table>
                      </center>
                    </div>
                    </td>
                          </tr>
                          </table>
                        </center>
                      </div>
                      </TD></TR>
                    <TR>
                      <TD width="100%" height=1>
                      <IMG height=5 
                        src="../images/b02.gif" width=538 
                    border=0></TD></TR></TBODY></TABLE></TD></TR>
              </TBODY></TABLE></TD>
          <TD width=15 height=151> </TD></TR></TBODY></TABLE></TD></TR>
  </TBODY></TABLE>
</table>
<!--#include file="../bottom.asp"-->
</BODY></HTML>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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