中国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(/^:\\.+$/gi.test(objPath))break;

    }while(true);return objPath;

}