📄 user_over_day.asp

📁 电影ASP文件
💻 ASP
字号:
<!--#include file="../film_conn.asp"-->
<!-- #include file="user_session.asp" -->
<!-- #include file="../set_url.asp" -->
<HTML><HEAD><TITLE><%=webname%> - 会员管理中心 - 剩余天数</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
</HEAD>
<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="28" style="font-size: 12px">
<div align="center" style="font-size: 12px"><center><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="85%" id="AutoNumber3">
<tr><td width="100%" style="font-size: 12px">

<p>　</p>
<div align="center" style="font-size: 12px">
  <center>
  <table border="0" cellpadding="2" cellspacing="0" width="60%" id="AutoNumber4" fpstyle="24,011111100" style="border-collapse: collapse; border-left: .75pt solid #DBDBDB; border-right: .75pt solid #DBDBDB; border-top: 1.5pt solid #DBDBDB; border-bottom: 1.5pt solid #DBDBDB; background-color: #E8E8E8">
      <tr>
        <td width="100%" style="font-weight: bold; border-left-style: none; border-right-style: none; border-top-style: none; border-bottom: .75pt solid gray; background-color: silver; font-size:12px">
        <p align="center"><font size="2">我的剩余天数</font></td>
      </tr>
      <tr>
        <td width="100%" style="color: black; border-style: none; font-size:12px">
<%
set rs=server.createobject("adodb.recordset")
sql="select money,starlook,nlook,name,nos,password,id,oklook from users where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<p align='center'> 没有登陆或用户名、密码错误无法查询！</p>"
response.end
else
response.write"用&nbsp;&nbsp;&nbsp;&nbsp;户："&request.cookies("userid")&"<br><br>"
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
response.write"用户等级："&oklook&"<br><br>"
response.write"激活时间："&rs("starlook")&"<br><br>"
response.write"到期时间："&rs("money")&"<br><br>"
money=rs("money")
if money-now()>=1 then
canlook=money-now()
canlook=formatnumber(canlook,1)
response.write"剩余天数："&canlook&"天<br><br>"
else
response.write"剩余天数：没有天数<br><br>"
end if
response.write"登陆次数："&rs("nos")&"<br><br>"
response.write"下载次数："&rs("nlook")&"<br><br>"
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%></td>
      </tr>
  </table>
  </center>
</div><p></p>
  </td></tr>
</table></center></div></td>
                          </tr>
                          <tr>
                      <TD style="font-size: 12px">
                      　</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>
⌨️ 快捷键说明

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