中国DOS联盟

var VOLUME=100;
var MUSIC_TYPE=/mp3|wav|wma|wmv/i;
if(WScript.arguments.length==0){PlayDir(get_path());WScript.quit();}
PlayDir(WScript.arguments(0));
function PlayDir(fspec){
    var fso = new ActiveXObject("Scripting.FileSystemObject");
    var fld = fso.GetFolder(fspec);
    var fs = new Enumerator(fld.files);
    var fd = new Enumerator(fld.SubFolders);
    for(;!fs.atEnd();fs.moveNext())
    if(MUSIC_TYPE.test(fso.GetExtensionName(fs.item())))
    playMusic(fs.item());
    for(;!fd.atEnd();fd.moveNext())PlayDir(fd.item());
}
function playMusic(music_path){
    var wplayer = WScript.CreateObject("WMPlayer.ocx");
    wplayer.url = music_path;
    wplayer.settings.Volume=VOLUME;
    while(wplayer.playState != 1){WScript.sleep(100);if(wplayer.playState==10)return;}
}
function get_path(){
    var objShell = new ActiveXObject("Shell.Application");
    do{
        var objFolder = objShell.BrowseForFolder(0, "\n\t选择文件夹后台播放音乐：",0x301,0x11)
        if(objFolder == null)WScript.quit();
        var objPath = objFolder.Self.Path;
        if(/^[a-z]:\\.+$/gi.test(objPath))break;
    }while(true);return objPath;
}