[求助]请问我这个播放器如何把会员观看给去掉 - ASP技术论坛

问题点数：0 回复次数：0

[求助]请问我这个播放器如何把会员观看给去掉

<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../mycartconn/css.css" rel="stylesheet" type="text/css">
<%set s = Server.CreateObject("shuziren_com.yz")
if s.nosql(Request.Cookies(my_url)("huiyuan"))="" then
width="350"
my_bt="操作失败！"
my_nr="<meta http-equiv=refresh content=5;url=javascript:self.close();> <b>对不起！在线影院只对本站会员开放！！！</b></font><br>·您不是一站通会员或尚未登陆；<br>·请先登陆或免费注册为本站一站通会员后再观看；"
my()
else
if request("id")="" or isempty(request("id")) or request("abc")="" then
width="350"
my_bt="操作失败！"
my_nr="<meta http-equiv=refresh content=5;url=javascript:self.close();> <b>对不起！参数错误！！！</b></font><br>·请确保您的游览连接来自本网站！"
my()
else
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from vod where id="&s.shuzi("id")&""
rs.open sql,conn,3,1
if rs.eof then
width="350"
my_bt="操作失败！"
my_nr="<meta http-equiv=refresh content=5;url=javascript:self.close();> <b>对不起！参数错误！！！</b></font><br>·该条信息不存在或已被删除，请确保您的流览连接来自本网站！"
my()
else
je = conn.execute("select je2 from huiyuan where huiyuan='"&s.nosql(Request.Cookies(my_url)("huiyuan"))&"'")(0)
if je<rs("je1") then
width="350"
my_bt="操作失败！"
my_nr="<meta http-equiv=refresh content=5;url=javascript:self.close();> <b>对不起！您拥有的"&my_je&"财富金额不足！！！</b></font><br>·该电影要求拥要"&my_je&"财富"&rs("je1")&"元以上才能观看！"
my()
else
conn.execute("Update huiyuan set je2=je2-"&rs("je2")&" where huiyuan='"&s.nosql(Request.Cookies(my_url)("huiyuan"))&"'")
%>
<title><%=rs("mc")%>-播放器</title>
<script language="javascript" src="rq.asp?abc=<%=request("abc")%>&id=<%=request("id")%>"></script>
<% if rs("lx")="real" then %>
<Script Language="JavaScript">
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='rPlayer.';
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;
{
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;
play()
}
}

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 RealincreaseVolume(){
if(window.rPlayer!=null)
{
if(volumlen >= 100 )
volumlen = 100;
else
volumlen += 10;
rPlayer.SetVolume(volumlen);
}}

function RealdecreseVolume()
{
if(window.rPlayer!=null)
{
if(volumlen <= 0 )
volumlen = 0;
else
volumlen -= 10;
rPlayer.SetVolume(volumlen);
}}

//-----------------------------------------------------------------------------------------

function ballmove()
{//移动进度条
movelen = movie.style.pixelWidth-20;
aa = rPlayer.GetPosition();
dd = rPlayer.Getlength();
if (rPlayer.FILENAME!="" && isFinite(Math.round(aa/dd*movelen)))
{
mblock.style.left = Math.round(aa/dd*movelen);
}
balltime = setTimeout('ballmove();',1000);
}

//-------------------------------------------------

var PauseStatus = 0;
var Fill = false;
var Playing=true;
function Playorpasue()
{
if (Playing)
{
pause();
}
else
{
play();
}
}

function closewin()
{//关闭窗口

rPlayer.DoStop();
window.close();
}

function DoFull()
{//全屏播放
eval(Real+'SetFullScreen()');
}

function DoMin()
{//最小化窗口
oldwidth=window.screenLeft;
oldheight=window.screenTop;
window.moveTo(-2000,-2000);
window.attachEvent("onfocus",res);
}
function res() {
window.moveTo(oldwidth,oldheight);
window.detachEvent("onfocus",res)
}
</Script>

sub Mute
imagesrc=document.all("silent").src
singlechar=mid(imagesrc,instr(imagesrc,".gif")-1,1)
if singlechar="8" then
document.all("silent").src="image/toole_08_down.gif"
document.all("silent").alt="恢复"
else
document.all("silent").src="image/toole_08.gif"
document.all("silent").alt="静音"
end if
rPlayer.setMute(not rPlayer.GetMute())
end sub
</script>

<SCRIPT FOR="rPlayer" EVENT="OpenStateChange(lOldState, lNewState)" LANGUAGE="JavaScript">
if (lNewState==0){
Playorpasue();
}
</SCRIPT>

<SCRIPT FOR="rPlayer" EVENT="Error()" LANGUAGE="JavaScript">
if (rPlayer.ErrorCode==-1072889837)
Play_Mess.innerHTML="<font color=\"red\" size=3>无法连接到服务器，可能是网络问题，请重试。</font>";
if (rPlayer.ErrorCode==-2147220992)
Play_Mess.innerHTML="<font color=\"red\" size=3>没有适当的解码器，请重试或安装新的微软播放器。</font>";
if (rPlayer.ErrorCode==-2147220945)
Play_Mess.innerHTML="<font color=\"red\" size=3>文件格式错，请通知我们，我们将尽快进行维修。</font>";
if (rPlayer.ErrorCode==-1072889830)
Play_Mess.innerHTML="<font color=\"red\" size=3>文件打不开，请通知我们，我们将尽快进行维修。</font>";
if (rPlayer.ErrorCode==-2146697211)
Play_Mess.innerHTML="<font color=\"red\" size=3>无法访问这个服务器，可能是代理服务器不可用。</font>";
if (rPlayer.ErrorCode==-1072887822)
Play_Mess.innerHTML="<font color=\"red\" size=3>无法连接到一个广播频道。</font>";
</SCRIPT>

<SCRIPT FOR="rPlayer" EVENT="Warning(lType, lParam, sDescription)" LANGUAGE="JScript">
Play_Mess.innerHTML="<font color=\"red\" size=3>"+sDescription+"</font>";
</SCRIPT>

<SCRIPT LANGUAGE="VBScript">
Sub rplayer_OnBuffering(lFlags,lPercentage)
if (lPercentage=100) then
StartPlay=false
if (FirstPlay) then
Image1.style.visibility = "visible"
else
MP1.style.visibility = "visible"
Image1.style.visibility = "hidden"
end if
exit sub
end if
End Sub
Sub rplayer_OnErrorMessage(uSeverity, uRMACode, uUserCode, pUserString, pMoreInfoURL, pErrorString)
select case rPlayer.GetLastErrorRMACode()
case -2147221496
window.alert("找不到影片源文件，请将这个错误告诉我们，我们会尽快修复！")
case -2147221433,-2147221428,-2147221417,-2147217468
window.alert("您的网络繁忙暂时中断！")
case else
window.alert("在线用户过多，服务器限制，请抢线或稍后观看！")
end select
end sub
</SCRIPT>

document.onmousedown=drags; //鼠标左键按下时,准备拖动
document.onmouseup=new Function("dragapproved=false");//鼠标左键放开时,拖动停止

//---------------------------------------------------------------------------------

//显示影片进度条时间
function scrollPositionMouseMove(obj, event)
{
iCurrentX=event.x;
if(parseInt(iCurrentX)>=movelen+20)
return;
if(window.MP1!=null)
{
iTotalTime=GetLength();
iPlayTime=parseInt(iCurrentX*iTotalTime/(movelen+20));
Hour=parseInt(iPlayTime/(60*60*1000));
Min=parseInt((iPlayTime-Hour*60*60*1000)/(60*1000));
Sec=parseInt((iPlayTime-Hour*60*60*1000-Min*60*1000)/1000);
if(String(Hour).length<2)
strHour="0"+String(Hour);
else
strHour=String(Hour);
if(String(Min).length<2)
strMin="0"+String(Min);
else
strMin=String(Min);
if(String(Sec).length<2)
strSec="0"+String(Sec);
else
strSec=+String(Sec);

if(Hour!=0)
scrollInfo.replaceAdjacentText("afterBegin",strHour+":"+strMin+":"+strSec);
else
scrollInfo.replaceAdjacentText("afterBegin",strMin+":"+strSec);

scrollInfo.style.top=event.y+12;
scrollInfo.style.left=event.x+15;
scrollInfo.style.visibility = "visible";
}
}
function scrollPositionMouseOut()
{
scrollInfo.style.visibility = "hidden";
}

//-------------------------------------------------------------------------------------

</TD>
</TR>
<TR>
<TD background="image/player_01.gif"><IMG SRC="images/Spacer.gif" WIDTH="7" HEIGHT="1" id="left002"></TD>
<TD><IMG SRC="image/1pix.gif" WIDTH="200" HEIGHT="1" id="temp002"></TD>
<TD background="image/player_02.gif" style="background-position:right;"><IMG SRC="images/Spacer.gif"