指引网

当前位置: 主页 > 编程开发 > ASP >

在线媒体播放器全新揭密

来源:网络 作者:佚名 点击: 时间:2017-06-22 20:09
[摘要] '最近发现老有人问及在线播放器的问题 '在下做了一个利用MS Media Player的组件的在线播放器, '并且可以随时下载MS最新有播放组件 '这是一个在线媒体播放器的代码 html head 在线Media P
'最近发现老有人问及在线播放器的问题
'在下做了一个利用MS Media Player的组件的在线播放器,
'并且可以随时下载MS最新有播放组件
'这是一个在线媒体播放器的代码
<html>
<head>
在线Media Player
</head>
<body>
<script language="VBScript">
sub setFullScreen(x)
    MediaPlayer.DisplaySize = x
end sub
sub Player_Click( Button, ShiftState, x, y )
    if MediaPlayer.DisplaySize=3 then
    MediaPlayer.DisplaySize = 4
    end if
end sub
</script>
<p align="center">
<OBJECT ID="MediaPlayer" width=160 height=182    align=absmiddle     border=0
    classid="CLSID:22D6F312-B0F6-11D0-94AB-0080C74C7E95"
    codebase=
    "http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701"
        standby="正在下载播放控件..."
        type="application/x-oleobject">
    <PARAM NAME="FileName" VALUE="ftp://ftp.pcvr2000.net/pub/game/movie/WorldSoccer.mpg">
    <PARAM NAME="ShowStatusBar" VALUE="True">
    <PARAM NAME="ShowCaptioning" VALUE="True">
    <PARAM NAME="ShowPositionControls" VALUE="True">
    <EMBED type="application/x-mplayer2"
    pluginspage = "http://www.microsoft.com/Windows/MediaPlayer/"
    SRC="demo.asx"
    name="MediaPlayer"
------分隔线----------------------------