ASP电影播放器

页面导航:首页 > 网络编程 > 网页播放器 > ASP电影播放器

ASP电影播放器

来源:互联网 作者:脚本宝典 时间:2015-06-21 12:17 【

% MovURL=Request(MovURL) % body style=BACKGROUND-COLOR: white; MARGIN: 0px scroll=no marginheight=0 table width=100% height=100% border=1 cellpadding=0 cellspacing=0 tr td align=center script LANGUAGE=javaScript var ERR_NonePlayer=播放器提

<% MovURL=Request("MovURL") %> <body style="BACKGROUND-COLOR: white; MARGIN: 0px" scroll=no marginheight="0"> <table width="100%" height="100%" border="1" cellpadding="0" cellspacing="0"> <tr> <td align="center"> <script LANGUAGE="javaScript"> var ERR_NonePlayer="播放器提示您: 您的系统中没有安装Real Player播放器,请到主页上下载。\n\n\nMovie播放器将关闭。"; var ERR_FileNotFind="播放器提示您: 对不起,未发现你要点播的影片。\n\n\n请您更换其他影片!"; var ERR_NotLocateServer="播放器提示您: 对不起,你的IP还不能观看此电影!\n\n\n请把本站的网址:http://www.zh1861.net/发给你QQ上的5位网友,你就可以看了。"; var ERR_UnkownError="播放器提示您: 影片地址错误,请给管理员留言,让管理员修正地址!\n\n\n请大家把本站的网址:http://www.zh1861.com/发给你QQ上的5位网友再回来观看哦。\n\n\n或者更换其它影片观看!"; </script> <script LANGUAGE="VBScript"> on error resume next RealPlayerG2 = (NOT IsNull(CreateObject("rmocx.RealPlayer G2 Control")))\n'); RealPlayer5 = (NOT IsNull(CreateObject("RealPlayer.RealPlayer(tm) ActiveX Control (32-bit)"))) RealPlayer4 = (NOT IsNull(CreateObject("RealVideo.RealVideo(tm) ActiveX Control (32-bit)"))) if not RealPlayerG2 and RealPlayer5 and RealPlayer4 then if MsgBox("您的浏览器无法自动下载最新的浏览器插件,是否要下载播放器来播放?", vbYesNo) = vbYes then window.location = "http://www.i-movie.cn/tools/RealOnePlayer2GOLD.exe" end if end if

Sub player_OnBuffering(lFlags,lPercentage) if (lPercentage=100) then StartPlay=false if (FirstPlay) then FirstPlay=false end if exit sub end if End Sub Sub player_OnErrorMessage(uSeverity, uRMACode, uUserCode, pUserString, pMoreInfoURL, pErrorString) select case player.GetLastErrorRMACode() case -2147221496 window.alert(ERR_FileNotFind) case -2147221433,-2147221428,-2147221417,-2147217468 window.alert(ERR_NotLocateServer) case else window.alert(ERR_UnkownError) end select End Sub </script>

<object width="100%" height="100%" name="RP1" id="player" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA"> <param name="AUTOSTART" value="-1"> <param name="SHUFFLE" value="0"> <param name="PREFETCH" value="0"> <param name="NOLABELS" value="0"> <param name="CONTROLS" value="Imagewindow"> <param name="CONSOLE" value="clip1"> <param name="LOOP" value="0"> <param name="NUMLOOP" value="0"> <param name="CENTER" value="1"> <param name="MAINTAINASPECT" value="1"> <param name="BACKGROUNDCOLOR" value="#000000"> </object></td> </tr> <tr> <td height="60">

<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0"> <td align="center" bgcolor="#000000"> <table border=1 cellpadding=0 cellspacing=0 width="100%"> <td width="50"><img src="ctrl-fullscreen.gif" alt="如果你窗口播放效果不好,请改用全屏方式播放。" width="50" height="30" border="0" onClick="document.RP1.SetFullScreen()"></td> <td> <object classid=clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA height=30 id="RP2" name="RP2" width=100%> <param name="_ExtentX" value="4657"> <param name="_ExtentY" value="794"> <param name="AUTOSTART" value="-1"> <PARAM NAME="SRC" VALUE="<%=MovURL%>"> <param name="SHUFFLE" value="0"> <param name="PREFETCH" value="0"> <param name="NOLABELS" value="-1"> <param name="CONTROLS" value="ControlPanel"> <param name="CONSOLE" value="clip1"> <param name="LOOP" value="0"> <param name="NUMLOOP" value="0"> <param name="CENTER" value="0"> <param name="MAINTAINASPECT" value="0"> <param name="BACKGROUNDCOLOR" value="#000000"> </object></td> </tr> </table> </td> </tr> <tr> <td align="center" bgcolor="#000000"><object classid=clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA height=30 id="RP3" name="RP3" width=100%> <param name="_ExtentX" value="4657"> <param name="_ExtentY" value="794"> <param name="AUTOSTART" value="-1"> <param name="SHUFFLE" value="0"> <param name="PREFETCH" value="0"> <param name="NOLABELS" value="-1"> <param name="CONTROLS" value="StatusBar"> <param name="CONSOLE" value="clip1"> <param name="LOOP" value="0"> <param name="NUMLOOP" value="0"> <param name="CENTER" value="0"> <param name="MAINTAINASPECT" value="0"> <param name="BACKGROUNDCOLOR" value="#000000"> </object> <script language="javascript"> player.SetEnableContextMenu(false); player.SetWantErrors(true); </script> </td> </tr> </table> </td> </tr> <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); } document.onmousedown=click; document.oncontextmenu = new Function("return false;") </script> </table>

</tr> </table>

Tags:

相关文章

    文章评论

    最 近 更 新
    热 点 排 行
    Js与CSS工具
    代码转换工具
    
    <