📄 open.asp
字号:
<!--#include file="articleconn.asp"-->
<!--#include file="inc/config.asp"-->
<%=timmb%><%=timemb%><%=mbname%><%=why%>
<%'网吧用户IP自动登录
function LockmbIP(sip)
dim str1,str2,str3,str4
dim num,csk
lockmbIP=false
if isnumeric(left(sip,2)) then
str1=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str2=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str3=left(sip,instr(sip,".")-1)
str4=mid(sip,instr(sip,".")+1)
if isNumeric(str1)=0 or isNumeric(str2)=0 or isNumeric(str3)=0 or isNumeric(str4)=0 then
else
num=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1
sql20="select count(*) from goip where mbname<>'' and ip1 <="&num&" and ip2 >="&num&""
set csk=conn.execute(sql20)
Set csk3=Server.CreateObject("ADODB.Recordset")
sql21="select * from goip where mbname<>'' and ip1 <="&num&" and ip2 >="&num&""
csk3.open sql21,conn,1,3
if csk3.eof and csk3.bof then
else
mbname=csk3("mbname")
timmb=csk3("tim")
timemb=csk3("time")
why=csk3("why")
sip1=csk3("sip1")
sip2=csk3("sip2")
end if
if csk(0)>0 then
lockmbIP=true
end if
set csk=nothing
end if
end if
end function
if LockmbIP(Request.ServerVariables("REMOTE_ADDR")) then
if now() > timemb then
response.write"<script>alert('您的网吧帐号已经到期请尽快续费！\n\n到期日期："& timemb &"');window.close();</Script>"
response.end
end if
dim sql
dim rs
articleid=request("film2")
urlid=request("film1")
if isnumeric(articleid)=false or isnumeric(urlid)=false then
response.redirect "error.asp?id=4"
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
serverip=rs("serverip")
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")=mbname
rsb("lookordown")="网吧在线"
rsb("looktime")=now()
rsb.update
rsb.close
set rsb=nothing
response.cookies(""&urlid&"")="yes"
%>
<html>
<head>
<title>【<%=rs("title")%> <%=filmname%>】- 如果始终在连接状态，可关掉播放窗口重新点播!</title>
<Script Language="JavaScript">
if(window.name!="<%=homes%>"){window.location='index.html';}
IEvar=navigator.appVersion.substring(navigator.appVersion.indexOf('MSIE')+5,navigator.appVersion.indexOf(';',17));
if(IEvar=="6.0")
{
ie6 = true;
width_add = 10;
height_add = 29;
jjjj = 5;
hand_add = -14;
}
else
{
ie6 = false;
width_add = 0;
height_add = 0;
jjjj = 0;
hand_add = 0;
}
b_width = 0;
b_height = 0;
//屏蔽右键
function no_newwin(){
if((event.ctrlKey)&&(event.keyCode==78)){
event.keyCode=0;
event.returnValue=false;
}
}
function click()
{
return false;
}
document.oncontextmenu=click;
document.onmousemove=click;
document.ondragstart=doDragStart
function doDragStart() {event.returnValue=false}
//-----------------------------------------------------------------------------------------
var Real;
Real='mPlayer.';
var Mute=false;
var CanSetPos=true;
var SetPosStart=false;
var SetVolStart=false;
var loop, timer, initialised;
var speed=50;
var oldwidth=566,oldheight=502;
moveon=false;movelen=300;rm_tollen=0;timelen=0;volumlen=56;iScrollLength=140;
document.onmouseup=Total_Up;
function Total_Up(){
if(event.button!=2){
if(SetPosStart){
setpos();
ballmove();
}
if(SetVolStart) setvol();
}
}
function moves()
{
if(CanSetPos&&event.button!=2)
{
orix=event.x;
orileft=mblock.style.pixelLeft;
if(moveon)
{
clearTimeout(balltime);
}
SetPosStart=true;
}
else
return false;
}
function ChangePos() {
newleft=event.x;
if ((newleft<movelen+20) && (newleft>=0) && (mPlayer.PlayState<=2) && (mPlayer.OpenState==6)) {
SetPosStart=false;
if (event.x < movelen+10)
newleft=event.x-10;
else
newleft=movelen-1;
if (event.x < 10)
newleft=0;
rm_tollen = GetLength();
rcp=Math.round((newleft/movelen)*rm_tollen);
SetPosition(rcp);
mblock.style.left = newleft;
}
}
function movego()
{
if(SetPosStart)
{
newx=event.x;
disx=newx-orix;
newleft=orileft+disx;
if(newleft>-1&&newleft<movelen) mblock.style.left=newleft;
}
}
function setpos()
{
SetPosStart=false;
newleft=mblock.style.pixelLeft;
rm_tollen = GetLength();
rcp=Math.round((newleft/movelen)*rm_tollen);
SetPosition(rcp);
}
function vols()
{
if(event.button!=2)
{
orix=event.x;
orileft=vblock.style.pixelLeft;
SetVolStart=true;
}
}
function volgo()
{
if(SetVolStart)
{
newx=event.x;
disx=newx-orix;
newleft=orileft+disx;
if(newleft>5&&newleft<=volumlen) vblock.style.left=newleft;
}
}
function setvol()
{//设置音量
SetVolStart=false;
newleft=vblock.style.pixelLeft;
newvol=-(Math.round((volumlen-newleft)*2000/(volumlen-6)));
SetVolume(newvol);
}
//-----------------------------------------------------------------------------------------
function ballmove()
{//移动进度条
movelen = movie.style.pixelWidth-20;
aa = mPlayer.CurrentPosition;
dd = mPlayer.Duration;
if (mPlayer.FILENAME!="" && isFinite(Math.round(aa/dd*movelen)))
{
mblock.style.left = Math.round(aa/dd*movelen);
}
balltime = setTimeout('ballmove();',1000);
}
function SetPosition(Pos)
{
eval(Real+'CurrentPosition='+Pos);
}
function SetVolume(Pos)
{
eval(Real+'Volume=Pos');
}
function SetFastForward()
{
if (mPlayer.CanScan)
eval(Real+'FastForward()');
}
function SetFastReverse()
{
if (mPlayer.CanScan)
eval(Real+'FastReverse()');
}
function SetMute(Status)
{
if (Status)
{
eval(Real+'Mute=true');
}
else
eval(Real+'Mute=false');
eval(Real+'Play()');
}
function GetLength()
{
return eval(Real+'Duration');
}
function GetPosition()
{
tt=eval(Real+'CurrentPosition');
return tt*1000;
}
function ClickSound(aa)
{
if (Mute)
{
Mute=false;
SetMute(Mute);
aa.src='../image/toole_08_over.gif';
}
else
{
Mute=true;
SetMute(Mute);
aa.src='../image/toole_08_down.gif';
}
}
//-------------------------------------------------
var PauseStatus = 0;
var Fill = false;
var Playing=true;
function Playorpasue()
{
if (Playing)
{
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -