⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 2233d86.asp

📁 视频点播系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_showHideLayers() { //v3.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; }
    obj.visibility=v; }
}
//-->
      </script>
      <script language="JavaScript">
<!--
function fullscreen() {       
	msplayer.FullScreen=true;
}
function fullscreen64() {       
	msplayer.DisplaySize=3;
}
-->
      </script>
      <script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--


var st=0;
var st2=0;




function MediaPlayer1_EndOfStream() {
	reg.button1.disabled=false;
	reg.fullscreen.disabled=true;	
}

function MediaPlayer1_Error() {
	reg.aderror.value="on";
	alert('已超过本站最大负载能力,请稍后尝试观看当前影片!');
	reg.button1.disabled=false;
	reg.fullscreen.disabled=false;
}

function reg_onsubmit() {
	reg.button1.disabled=true;
	reg.fullscreen.disabled=false;
	return true;
}

//-->
      </script>
      <script LANGUAGE="javascript" FOR="MediaPlayer1" EVENT="EndOfStream">
<!--
 MediaPlayer1_EndOfStream()
	reg.button1.disabled=false;

//-->
      </script>
      <script LANGUAGE="javascript" FOR="MediaPlayer1" EVENT="Error">
      </script>
      <script LANGUAGE="javascript" FOR="MediaPlayer1" EVENT="OpenStateChange">
      </script>
      <script LANGUAGE="javascript" FOR="MediaPlayer1" EVENT="PlayStateChange">
      </script>
      <object id="MediaPlayer1" style="left: 0px; top: 0px" type="application/x-oleobject" height="385" standby="Loading Media Player components..." width="462" classid="CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95" codebasr="http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701" ? name="msplayer">
        <param name="AudioStream" value="-1">
        <param name="AutoSize" value="0">
        <param name="AutoStart" value="-1">
        <param name="AnimationAtStart" value="-1">
        <param name="AllowScan" value="-1">
        <param name="AllowChangeDisplaySize" value="-1">
        <param name="AutoRewind" value="0">
        <param name="Balance" value="0">
        <param name="BaseURL" value>
        <param name="BufferingTime" value="5">
        <param name="CaptioningID" value>
        <param name="ClickToPlay" value="0">
        <param name="CursorType" value="0">
        <param name="CurrentPosition" value="-1">
        <param name="CurrentMarker" value="0">
        <param name="DefaultFrame" value>
        <param name="DisplayBackColor" value="0">
        <param name="DisplayForeColor" value="16777215">
        <param name="DisplayMode" value="0">
        <param name="DisplaySize" value="4">
        <param name="Enabled" value="-1">
        <param name="EnableContextMenu" value="0">
        <param name="EnablePositionControls" value="-1">
        <param name="EnableFullScreenControls" value="0">
        <param name="EnableTracker" value="-1">
        <param name="Filename" value="<%=rst("ipsip")%><%=real%>">
        <param name="InvokeURLs" value="-1">
        <param name="Language" value="-1">
        <param name="Mute" value="0">
        <param name="PlayCount" value="1">
        <param name="PreviewMode" value="0">
        <param name="Rate" value="1">
        <param name="SAMILang" value>
        <param name="SAMIStyle" value>
        <param name="SAMIFileName" value>
        <param name="SelectionStart" value="-1">
        <param name="SelectionEnd" value="-1">
        <param name="SendOpenStateChangeEvents" value="-1">
        <param name="SendWarningEvents" value="-1">
        <param name="SendErrorEvents" value="-1">
        <param name="SendKeyboardEvents" value="0">
        <param name="SendMouseClickEvents" value="0">
        <param name="SendMouseMoveEvents" value="0">
        <param name="SendPlayStateChangeEvents" value="-1">
        <param name="ShowCaptioning" value="0">
        <param name="ShowControls" value="-1">
        <param name="ShowAudioControls" value="-1">
        <param name="ShowDisplay" value="0">
        <param name="ShowGotoBar" value="0">
        <param name="ShowPositionControls" value="-1">
        <param name="ShowStatusBar" value="0">
        <param name="ShowTracker" value="-1">
        <param name="TransparentAtStart" value="0">
        <param name="VideoBorderWidth" value="0">
        <param name="VideoBorderColor" value="0">
        <param name="VideoBorder3D" value="0">
        <param name="Volume" value="-600">
        <param name="WindowlessVideo" value="0">
      </object>
            <tr class="unnamed1"> 
              <td width="491" height="20" align="center" valign="middle" bgcolor="#E0E0E0"> 
                
              <MARQUEE scrolldelay="120"><script src="js/jstopgds.js"></script></MARQUEE></td>
              <td width="184" height="20" align="center" valign="middle" bgcolor="#E0E0E0"> 
                <a href="USER/buy.asp" target="_blank">
                <font size="2" color="#FF0000">用户续费</font></a><font size="2">
                </font> 
                <span lang="en-us"><a href="chageusr.asp" target="_blank">
                <font size="2">修改密码</td>
    </tr>
    <%
      rs.close
set rs=nothing
rst.close
set rst=nothing
conn.close
set conn=nothing
      response.end%>
    <%elseif rs("movietype")="mov" then 
      set rst=server.createobject("adodb.recordset")
   sql="select url from movieurl where id="&urlid
   rst.open sql,conn,1,1
   real=rst("url")
   set rst=server.createobject("adodb.recordset")
   sql="select * from movie where id="&serverip
   rst.open sql,conn,1,1
      %>
    <tr>
        <td width="470" colspan="2"> <p align="center"> 
            <SCRIPT language=VBScript id=clientEventHandlersVBS>
<!--
Sub window_onload
	dim verOK
	dim plugin
	plugin = null
	verOK = False
	on error resume next
	
	set plugin = CreateObject("OsoonPlugin.PlayerPlugin.1")
	if Not IsNull(plugin) then
		verOK = plugin.CheckVersion("1.5.0.1120") <= 0
	end if

	if Not verOK then
		if MsgBox("您的浏览器无法自动下载最新的浏览器插件,是否要下载播放器来播放?", vbYesNo) = vbYes then
			window.location = "http://61.163.231.80/OSPlayer.exe"
		end if
		if IsNull(plugin) then exit sub
	end if

	window.resizable=true
	
	window.resizeto 373,330
	window_onresize()	
	Player.autoscale = 1
	Player.URL = "<%=rst("ipsip")%><%=real%>"
End Sub

Sub window_onresize
	if document.body.clientWidth > 400 then
		Player.width = document.body.clientWidth
	else
		Player.width = 400
	end if
	if document.body.clientHeight > 400 then
		Player.height = document.body.clientHeight
	else
		Player.height = 400
	end if
End Sub

-->
            </SCRIPT>
            <object 
classid=clsid:991EB39C-C4B8-466e-99C1-ECCC44E2CED8 codebase="http://61.163.231.80/OsoonPlugin.cab#version=1,5,0,1120" name="Player1" width="462" height="385" id=Player>
              <param name="URL" value>
              <param name="Password" value>
              <param name="UserName" value>
            </object>
                      <tr class="unnamed1"> 
              <td width="491" height="20" align="center" valign="middle" bgcolor="#E0E0E0"> 
                <p> <MARQUEE scrolldelay="120"><script src="js/jstopgds.js"></script></MARQUEE></td>
              <td width="184" height="20" align="center" valign="middle" bgcolor="#E0E0E0"> 
                <a href="USER/buy.asp" target="_blank">
                <font size="2" color="#FF0000">用户续费</font></a><font size="2">
                </font> 
                <span lang="en-us"><a href="chageusr.asp" target="_blank">
                <font size="2">修改密码</td>
    </tr>

        </td>
    </tr>
    <%end if%>
  </table>
  </center>
</div>
<p>
<%
rs.close
set rs=nothing
rst.close
set rst=nothing
conn.close
set conn=nothing
%></body></body></body></body></body></body></body></p>

</body>

</html>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -