使用vbscript播放声音文件（MP3）

有没有办法用visual basic脚本播放声音文件（MP3）

Set obj = CreateObject("WScript.Shell")
obj.run "C:/test.mp3" 

还有一些其他的方法，如果也尝试过的话，但是它们不起作用

其中一个没有显示声音，但在脚本运行时没有错误。

使用CreateObject（“WMPlayer.OCX”）
.url=“C:\Test\Test.mp3”
.游戏
做
WScript.Sleep 100
循环直到.playState=1
以

当@omegastripes回答您的问题时，只需检查.mp3所在的路径即可

您还可以在线播放流：

With CreateObject("WMPlayer.OCX")
    .url = "http://94.23.221.158:9197/stream"
    .controls.play
    .settings.volume = 100
    Do
        WScript.Sleep 100
    Loop Until .playState = 1
End With

因此，如果您确定mp3文件位于路径

C:\Test.mp3

，只需替换这一行

.url=”http://94.23.221.158:9197/stream“

作者：

.url=“C:\Test.mp3”

您的代码可以这样编写：

With CreateObject("WMPlayer.OCX")
    .url = "C:\Test.mp3"
    .controls.play
    .settings.volume = 100
    Do
        WScript.Sleep 100
    Loop Until .playState = 1
End With

---

您甚至可以执行以下操作：

Dim oWmp : Set oWmp = CreateObject("Wmplayer.OCX")
oWmp.Url = "C:\test.mp3"
oWmp.OpenPlayer(oWmp.Url)

---

它什么也没放？@FroggyIsDank5检查你的.mp3所在的路径！