📄 play.asp
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!--#include file="articleconn.asp"-->
<!--#include file="IP.asp"-->
<% Response.Expires=0
dim sql
dim rs
articleid=request("film2")
urlid=request("film1")
if articleid="" or urlid="" then
response.write"<script>alert('你这是在干什么呀，不嫌累吗？\n\n\n找过来找过去，怎么也是找不着，哈哈！\n\n\n不用浪费你的宝贵时间拉，还是赶快联系管理员吧！');</Script><script Language=Javascript>location.href = 'index.asp';</script>"
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select serverip,canlook,movietype,title from learning where articleid="&articleid
rs.open sql,conn,1,1
serverip=rs("serverip")
okip=Request.Servervariables("HTTP_X_FORWARDED_FOR")
If okip="" Then okip=Request.Servervariables("REMOTE_ADDR")
set rst8=server.createobject("adodb.recordset")
sql="select okip,testok,endtimes from okip where okip='"&okip&"'"
rst8.open sql,conn,1,1
if rst8.eof and rst8.bof then
if request.cookies("userid")="" or request.cookies("password")="" then
%>
<script language="JavaScript">
<!--
function checkinput()
{
if (document.search.userid.value=="")
{
alert("请输入用户名！");
document.search.userid.focus();
return false;
}
if (document.search.password.value=="")
{
alert("请输入密码！");
document.search.password.focus();
return false;
}
if (document.search.validateCode.value=="")
{
alert("请输入验证码！");
document.search.validateCode.focus();
return false;
}
return true;
}
-->
</script>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户登录</title>
<style><!--body, td, p, li, input, select{FONT-SIZE: 9pt; font-family:宋体; COLOR: #ffffff; font-family:Arial}
.fontshadow { width:100%; filter:dropshadow(color=#ffffff,offx=1,offy=1);}
A:link{COLOR: #ffffff; text-decoration: none;}
A:visited{COLOR: #ffffff; text-decoration: none;}
A:Active{color : #ffffff; TEXT-DECORATION: none;}
A:hover{color: #ffffff; TEXT-DECORATION: none;}
A.a1:link{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:visited{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:Active{color : #000000; TEXT-DECORATION: none;}
A.a1:hover{color : #000000; TEXT-DECORATION: none;}
A.a2:link{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:visited{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:Active{color : #1B409B; TEXT-DECORATION: none;}
A.a2:A:hover{color: #1B409B;T EXT-DECORATION: none;}
.L17{line-height:170%}
.L18{line-height:180%}
.L20{line-height:200%}
--></style>
</head>
<body bgcolor="#0F0DAE" text="0" leftmargin="0">
<table border="0" cellspacing="0" align=center style="border-collapse: collapse" bordercolor="#ffffff" width="250" id="AutoNumber1" cellpadding="0">
<TR>
<TD valign="top" background="images/login-bg.jpg" > <table width="90%" border="0" align="center">
<FORM method=post name=loginform action="userpass.asp"
onsubmit="if (!formcheck()) return false;">
<TBODY>
<TR>
<TD align="center" height=35><FONT
color=#3b591b class="fontshadow"></FONT></TD>
<TD align="left" height=25><FONT
color=#3b591b class="fontshadow"><b>帐 号 登 录</b></FONT></TD>
</TR>
<TR>
<TD align=right height=25 width="40%"><FONT
color=#3b591b class="fontshadow">用户名：</FONT></TD>
<TD width="65%"><INPUT name=userid
onfocus=javascript:this.select(); style="border: 1px solid #3655AA; font-size:9pt;color:#000000"" size=14 ></TD></TR>
<TR>
<TD align=right height=13 width="40%"><FONT
color=#3b591b class="fontshadow">密 码：</FONT></TD>
<TD><INPUT name=password
onfocus=javascript:this.select(); style="border: 1px solid #3655AA; font-size:9pt;color:#000000"" size=14 type=password></TD></TR>
<TR>
<TR>
<TD align=middle colSpan=2 height=25><input type="image" name="Submit" src="images/index-denglu.gif" width="62" height="18">  
<a href="reguser.asp" target=_blank>
<img border="0" src="images/index-zhuce.gif" width="62" height="18"></a>
</TD></TR> </form>
</table></TD>
</TR>
</TABLE>
</body>
</html>
<%response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select serverip,canlook,movietype,title,count from learning where articleid="&articleid
rs.open sql,conn,1,1
set rst=server.createobject("adodb.recordset")
sql="select money,oklook,lasthits,usercount,baoyue from users where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'"
rst.open sql,conn,1,3
if rst("baoyue")=1 then
if rs("canlook")<>0 then
if now() > rst("money") then
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>系 统 提 示</title>
<style><!--body, td, p, li, input, select{FONT-SIZE: 9pt; font-family:宋体; COLOR: #ffffff; font-family:Arial}
.fontshadow { width:100%; filter:dropshadow(color=#ffffff,offx=1,offy=1);}
A:link{COLOR: #ffffff; text-decoration: none;}
A:visited{COLOR: #ffffff; text-decoration: none;}
A:Active{color : #ffffff; TEXT-DECORATION: none;}
A:hover{color: #ffffff; TEXT-DECORATION: none;}
A.a1:link{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:visited{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:Active{color : #000000; TEXT-DECORATION: none;}
A.a1:hover{color : #000000; TEXT-DECORATION: none;}
A.a2:link{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:visited{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:Active{color : #1B409B; TEXT-DECORATION: none;}
A.a2:A:hover{color: #1B409B;T EXT-DECORATION: none;}
.L17{line-height:170%}
.L18{line-height:180%}
.L20{line-height:200%}
--></style>
</head>
<body bgcolor="#0F0DAE" text="0" leftmargin="0">
<table border="0" cellspacing="0" align=center style="border-collapse: collapse" bordercolor="#111111" width="359" id="AutoNumber1" cellpadding="0">
<TR>
<TD valign="top" background="images/login-bg.jpg" >
<table width="90%" border="0" align="center">
<tbody>
<TR>
<TD align="center" height=35><FONT color=#000000 class="fontshadow"><b>系 统 提 示</b></FONT></TD>
</TR>
<tr>
<td align=right width="105%" height=76>
<p align="center"><FONT color=#000000 class="fontshadow">你没有包月或者你包月的时间已经到期!</td>
</tr>
<</table></TD>
</TR>
</TABLE>
</body>
</html>
<%response.end
end if
end if
end if
tdate=date()
if rst("lasthits")=tdate then
sql="update users set dnlook=dnlook+1,nlook=nlook+1 where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'"
conn.Execute(sql)
else
conn.Execute("update users set dnlook=1,lasthits='"&tdate&"' where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'")
end if
set rst=server.createobject("adodb.recordset")
sql="select money,nlook,oklook,lasthits,dnlook,baoyue,usercount from users where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'"
rst.open sql,conn,1,3
if rst("baoyue")=0 then
set rsb00=server.createobject("adodb.recordset")
rsb00.open "select * from tolook where title='"&rs("title")&"' and userid='"&request.cookies("userid")&"'",conn,1,3
set rsb02=server.createobject("adodb.recordset")
rsb02.open "select * from tolook where title='"&rs("title")&"' and userid='"&request.cookies("userid")&"'",conn,1,3
do while not rsb02.eof
i=i+1
rsb02.movenext
loop
if rsb00.eof and rsb00.bof and rst("usercount")<rs("count") then
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>系 统 提 示</title>
<style><!--body, td, p, li, input, select{FONT-SIZE: 9pt; font-family:宋体; COLOR: #ffffff; font-family:Arial}
.fontshadow { width:100%; filter:dropshadow(color=#ffffff,offx=1,offy=1);}
A:link{COLOR: #ffffff; text-decoration: none;}
A:visited{COLOR: #ffffff; text-decoration: none;}
A:Active{color : #ffffff; TEXT-DECORATION: none;}
A:hover{color: #ffffff; TEXT-DECORATION: none;}
A.a1:link{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:visited{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:Active{color : #000000; TEXT-DECORATION: none;}
A.a1:hover{color : #000000; TEXT-DECORATION: none;}
A.a2:link{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:visited{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:Active{color : #1B409B; TEXT-DECORATION: none;}
A.a2:A:hover{color: #1B409B;T EXT-DECORATION: none;}
.L17{line-height:170%}
.L18{line-height:180%}
.L20{line-height:200%}
--></style>
</head>
<body bgcolor="#0F0DAE" text="0" leftmargin="0">
<table border="0" cellspacing="0" align=center style="border-collapse: collapse" bordercolor="#111111" width="359" id="AutoNumber1" cellpadding="0">
<TR>
<TD valign="top" background="images/login-bg.jpg" >
<table width="90%" border="0" align="center">
<tbody>
<TR>
<TD align="center" height=15><FONT color=#000000 class="fontshadow"><b>系统提示：你点数不够</b></FONT></TD>
</TR>
<tr>
<td align=right width="100%" height=76>
<p><FONT color=#000000 class="fontshadow"> 为了使会员能欣赏到高品质，速度更快的电影，因此采用会员注册的方式，部分影片采取计点，计点包月30元，看更多精彩影片请联系管理员，QQ：375050078,谢谢支持！<br><br><A href="cesu.asp" target=_blank><FONT color=#000000>测试网速</FONT></A> 免费试片: <A href="http://www.gq160.com/vod/movie.asp?id=1476" target=_blank><FONT color=#000000>画魂缠身</FONT></A> <A href="http://www.gq160.com/vod/movie.asp?id=1676" target=_blank><FONT color=#000000>皇家保镖</FONT></A> </td>
</tr>
</table></TD>
</TR>
</TABLE>
</body>
</html>
<%
response.end
end if
set rsb01=server.createobject("adodb.recordset")
rsb01.open "select * from tolook where title='"&rs("title")&"' and userid='"&request.cookies("userid")&"'",conn,1,3
if rsb01.eof and rsb01.bof or i>4 then
sql="update users set usercount=usercount-'"&rs("count")&"' where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'"
conn.Execute(sql)
end if
end if
rst.close
set rst=nothing
else
response.cookies("userid")=rst8("testok")
if now()>rst8("endtimes") then
response.write"该网吧使用已经到期，请续费。"
response.end
end if
set rst8=nothing
end if
set rsb=server.createobject("adodb.recordset")
rsb.open "select * from tolook",conn,1,3
rsb.addnew
rsb("title")=rs("title")
rsb("userip")=request.servervariables("remote_addr")
rsb("userid")=request.cookies("userid")
rsb("looktime")=Now()
rsb("lookordown")="在线"
rsb.update
rsb.close
set rsb=nothing
response.cookies(""&urlid&"")="yes"
%>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>【<%=rs("title")%>】如果始终在连接状态，可关掉播放窗口重新点播!-</title>
<link href="css/style.css" rel="stylesheet" type="text/css">
<body bgcolor="#ffffff" scroll="no" marginwidth="0" leftmargin="0" topmargin="0" oncontextmenu="window.event.returnValue=false" ondragstart="window.event.returnValue=false" onselectstart="event.returnValue=false">
<script language="JavaScript">
function click(e) {
if (document.all) {
if (event.button==2||event.button==3) {
oncontextmenu='return false';
}
}
if (document.layers) {
if (e.which == 3) {
oncontextmenu='return false';
}
}
}
if (document.layers) {
document.captureEvents(Event.MOUSEDOWN);
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -