在flash中用javascript控制頁面中的mediaplay

javascript|控制|頁面 　　做了一個FLASH按鈕來控制mediaplay。 以下是網頁部分代碼

function VolDn()
{ // 增音
var ps = Player.settings;
if(ps.mute == true){ps.mute = false;return;}
else{
if (ps.volume <= 30){ ps.volume =0;}
else{ps.volume = ps.volume - 30;}

}

}

function VolUp()
{ //減音
var ps = Player.settings;
if(ps.mute == true){ps.mute = false;return;}
else{
if (ps.volume >= (100-30)) {ps.volume = 100;}
else { ps.volume = ps.volume + 30;}

}

}
function playerPlay(){
Player.URL="mms://202.95.107.151/pggame">
}

function playerStop(){

if(Player.status!="準備就緒")
Player.controls.stop();
else return;
} mediaplay 代碼


<OBJECT ID=Player CLASSID="CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6"type="application/x-oleobject" Standby="Loading.... Microsoft Windows Media Player"
width="0" height="0" style="position:absolute;left:0px; top:0px;">
<PARAM NAME="URL" value="mms://202.95.107.151/pggame">
<PARAM NAME="rate" value="1">
<PARAM NAME="balance" value="0">
<PARAM NAME="currentPosition" value="0">
<PARAM NAME="defaultFrame" value="">
<PARAM NAME="playCount" value="1">
<PARAM NAME="autoStart" value="1">
<PARAM NAME="currentMarker" value="0">
<PARAM NAME="invokeURLs" value="-1">
<PARAM NAME="baseURL" value="">
<PARAM NAME="volume" value="100">
<PARAM NAME="mute" value="0">
<PARAM NAME="uiMode" value="full">
<PARAM NAME="stretchToFit" value="0">
<PARAM NAME="windowlessVideo" value="0">
<PARAM NAME="enabled" value="-1">
<PARAM NAME="enableContextMenu" value="0">
<PARAM NAME="fullScreen" value="0">
<PARAM NAME="SAMIStyle" value="">
<PARAM NAME="SAMILang" value="">
<PARAM NAME="SAMIFilename" value="">
<PARAM NAME="captioningID" value="">
</OBJECT> －－－－－－－－－－－－－－－－－－－
以上代碼　用HTML按鈕控制都無問題。 flash用簡單的命令控制。
如
b1.onRelease=function(){
getURL("javascript :VolUp()");
}
bt2.onRelease=function(){
getURL("javascript :VolDn()");
b3.onRelease=function(){
getURL("javascript :playerPlay()");
}
bt4.onRelease=function(){
getURL("javascript :playerStop()"); -------------
播放和停止都能用，但一用增音和減音，播放器就會停止。百思不得其解， 煩有空高手給解決一下，高分送上。 怎麼現實增聲減音。
---------------------------------------------------------------
使用fscommand傳遞命令，不要用javascript。 即在Flash中，
b1.onRelease=function(){
fscommand("VolUp");
}
在HTML中，在你現有的Javascript基礎上添加
var isInternetExplorer = navigator.appName.indexOf("Microsoft") != -1;
// 處理 Flash 影片中的所有 FSCommand 訊息
function FlashControl_DoFSCommand(command, args) {
var FlashControl = isInternetExplorer ? document.all.FlashControl : document.FlashControl;
// 代碼放在此處。
eval(command)();
}
// Internet Explorer 的掛鈎
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
document.write(’’<script language=\"VBscript\"\>\n’’);
document.write(’’On Error Resume Next\n’’);
document.write(’’Sub FlashControl_FSCommand(ByVal command, ByVal args)\n’’);
document.write(’’ Call FlashControl_DoFSCommand(command, args)\n’’);
document.write(’’End Sub\n’’);
document.write(’’</script\>\n’’);
} 以上FlashControl為嵌入HTML中的Flash Object id
---------------------------------------------------------------

　　簡單看了看，幫你修改了一下。VBscript的問題。幫你把Javascript中的一段代碼拿出來，就好使了。

Javascript中的這個代碼提出去
// Internet Explorer 的掛鈎
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
document.write(’’<script language=\"VBscript\"\>\n’’);
document.write(’’On Error Resume Next\n’’);
document.write(’’Sub FlashControl_FSCommand(ByVal command, ByVal args)\n’’);
document.write(’’ Call FlashControl_DoFSCommand(command, args)\n’’);
document.write(’’End Sub\n’’);
document.write(’’</script\>\n’’);
}

為
<script language="VBscript">
On Error Resume Next
Sub FlashControl_FSCommand(ByVal command, ByVal args)
Call FlashControl_DoFSCommand(command, args)
End Sub
</script>
就好用了，試試吧，有問題再給我留言。