[SignFJ]

Справочника по WSH нет под рукой.
Воспользуйся подобным перебором.

Код:

var fso, f, f1, fc, s;  
fso = WScript.CreateObject("Scripting.FileSystemObject");;  
//указывай свою папку
f = fso.GetFolder("C:");  
fc = new Enumerator(f.files); 
s = "";  
for (; !fc.atEnd(); fc.moveNext()) {    
//fc.item() возвратит полное имя файла
//если нужно только одно имя, то бери fc.item().name
  s += fc.item(); s += "\n";  
}  
WScript.Echo(s);

[megaloman]

Код:

Dir1 = "D:\Delete\Dir1"
Dir2 = "D:\Delete\Dir2"
Dir3 = "D:\Delete\Dir3"

Set FSO = CreateObject("Scripting.FileSystemObject")
Set Files = FSO.GetFolder(Dir1).Files

For Each f In Files
    If Not FSO.FileExists(Dir3 + "\" + f.Name) Then FSO.CopyFile f, Dir2 + "\" + f.Name, True
Next

MsgBox "Копирование выполнено"

[rromms]

megaloman,
Спасибо огромное!
У меня гораздо более громоздко получилось...