Question

如何使用VBS创建wmplayer实例,并播放指定音频文件?

如题~

Answer 1

Dim objwmp
Set objwmp=CreateObject("WMPlayer.OCX") '创建
With objwmp
.url="file:///E:/wowaudio/mp3/zonemusic1.mp3" '指定曲目
.controls.play '播放
End With

其它相关方法属性跟html调用wmp对像的设置是相同的
例如得到曲目长度
Msgbox Wmp.currentMedia.DurationString
OR
Msgbox Wmp.currentMedia.getItemInfo("Duration")