Скрипт вывода имен файлов папки по возрастанию размера. Подскажите реализацию

var folderaddress = "C:/"; // имя папки из которой будет происходить считывание файлов
       var fso, f, fc, s = "", ar = [], obj = {}, i = 0;
       fso = new ActiveXObject("Scripting.FileSystemObject");
       f = fso.GetFolder(folderaddress);       
       fc = new Enumerator(f.files);       
       for (; !fc.atEnd(); fc.moveNext()) {
            obj[fc.item().size] = fc.item().Name;
            ar[i] = fc.item().size;
            i++;
       }
         
        ar.sort(function(a,b){return a-b;});
         
        for (i=0; i < ar.length; i++) {
            s += obj[ar[i]]+"\n";
        }
         
        WScript.Echo(s);

var fpt = 'путь к папке',
    frm = '\t\t',                                                 // разделитель
    fso = new ActiveXObject ('Scripting.FileSystemObject'),
    fld = fso.GetFolder (fpt),
    arr = new Array (),
    ind = 0,
    fil = new Enumerator (fld.files);
for (; !fil.atEnd (); fil.moveNext ())
   arr [ind++] = fil.item ().Name + frm + fil.item ().size ;
arr.sort (function (x, y) {return (x.split (frm) [1] - y.split (frm) [1])});
WScript.Echo (arr.join ('\n'));