欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识！
您现在的位置是： 首页  >  IT编程

ASP电影播放器

程序员文章站 2022-03-13 08:09:23
<% movurl=request("movurl") %> 
<%
 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>

总算搞拈了
相关标签： ASP电影播放器

上一篇： H2 database文档学习

下一篇： 哈哈,让妹子们火大的二货男

推荐阅读