如何在HTML中使用VBScript播放WAV文件

Question

如何在HTML中使用VBScript播放WAV文件？

我有以下代碼，但無法正常工作。

<script type="text/vbscript" language="VBScript"> 
   Dim strSoundFile, strCommand  
   strSoundFile = "C:\Sounds\Sound1.wav"
   Set objShell = CreateObject("Wscript.Shell")
   strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
   objShell.Run strCommand, 0, True
</script>

我找到了另一個代碼，但是如果我在HTML頁面中使用它，它也無法正常工作，但是在* .VBS中它的效果很好。

  Sub Play(SoundFile)
            Dim Sound
            Set Sound = CreateObject("WMPlayer.OCX")
            Sound.URL = SoundFile
            Sound.settings.volume = 100
            Sound.Controls.play
            do while Sound.currentmedia.duration = 0
                wscript.sleep 100
            loop
            wscript.sleep(int(Sound.currentmedia.duration)+1)*1000
            End Sub

我已找到此鏈接https://support.microsoft.com/es-es/kb/279022，但我不確定這是否是正確的方法...

通過BODY標簽的方式工作正常

<object classid="clsid:6BF52A52-394A-11D3-B153-00C04F79FAA6" id="WindowsMediaPlayer" 
width="242" height="202" style="position:absolute; left:1;top:1;">
  <param name="URL" value="C:\Sound1.wav">
  <param name="autoStart" value="1">
</object>

可以用這個做嗎？

<script type="text/vbscript" language="VBScript"> HERE </script>

我在MS Windows 7 Pro下使用IE8。

Answer 1

最后我能找到正確的方法做我需要的是描述在這里

基本上這個想法是跟隨

1. 我們不能在HTML中使用上面的代碼，而必須使用嵌入式Windows Media Player對象。
2. 我們可以創建在VBScript中操作該對象所需的任何方法。