中国DOS联盟

Set oPlayer = CreateObject("WMPlayer.OCX")
oPlayer.URL = "有一种爱叫做放手.mp3"
oPlayer.controls.play
Do
WScript.Sleep 100
Loop Until oPlayer.openState <> 12

WScript.Sleep oPlayer.currentMedia.duration * 1000

输出后面2行就出错了

哈哈...搞定.... 不给沙发你们坐....