| 广告招租，e-mail:yesize@hotmail.com
|
|
广告招租，e-mail:yesize@hotmail.com
最近发现老有人问及在线播放器的问题
在下做了一个利用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"
width=160
height=182
ShowStatusBar=-1
ShowPositionControls=0
ShowCaptioning=-1>
</EMBED>
</OBJECT>
<br>
<input type="button" value="全屏播放"
onclick="setfullscreen(3)"> <input type="button"
value="100%播放" onclick="setfullscreen(2)"> <input
type="button" value="50%播放" onclick="setfullscreen(1)">
<br>
<A HREF="demo.asx">打开外部播放器</A>
</p>
</body>
</html> 下面是外挂播放器的信息文件(demo.asx)
<ASX version = "3.0">
<TITLE>External Captioning Demo</TITLE> <Entry>
<TITLE>Media Player Demo</TITLE>
<AUTHOR>Netnerd(歪书生)</AUTHOR>
<COPYRIGHT>2001 B6212.net</COPYRIGHT>
<Ref href = "mms://netshow.microsoft.com/ms/sbnasfs/wmt/shamu_28.asf" />
</Entry>
</ASX>
版权说明：作品来源于网上，版权归作者所有，如果无意中侵犯了您的版权，请来信告知，本站将在3个工作日内删除。yesize@hotmail.com |
|
加入最爱
热门小游戏分类 
