最简单的5行VBScript代码调用 WMPlayer.ocx 实现的简易音乐播放器 支持播放网络音乐

IUV

1. 
   
2. set wmp = CreateObject("WMPlayer.ocx")
   
3. wmp.url = "1.mid"
   
4. do until wmp.playState = 1
   
5. wsh.sleep 100
   
6. loop
   

复制代码