Код:

var n;
WScript.StdOut.Write("Введите число последних файлов:");
n = WScript.StdIn.ReadLine();
var a = Array() 
var fso = new ActiveXObject('Scripting.FileSystemObject') 
var files = new Enumerator(fso.GetFolder('c:\\').Files) 
for(var i = 0; !files.atEnd(); i++, files.moveNext()) 
{ 
   var file = files.item() 
   a[i] = {key: new Date(file.DateLastModified), val: file} 
} 
a = a.sort(function(v1, v2) {return v2.key < v1.key ? -1 : (v1.key == v2.key ? 0 : 1)}) 
for(var i = 0; i < n; i++) 
{ 
  fso.CopyFile(a[i].val,"C:\\papka\\");
}