Короче вот рекурсивный скрипт. Чтобы проверить его работу запишите его в любой файл *.js, поместите в папку где не очень много подпапок, Далее запустите его и вы замучаетесь щелкать появляющиеся Echo. Так вот мне нужно чтобы это было не ЕХО, а что-то другое, что позволяло бы продолжать работу скрипта без щелчков мыши. Можете посоветовать?
// 1 Взято но не рабочее с сайта: [url]http://forum.oszone.net/nextnewesttothread-199998.html[/url]
// 2объект файловой системы
var fso = new ActiveXObject("Scripting.FileSystemObject");
// 4 путь к каталогу, откуда запускается скрипт
var path = WScript.ScriptFullName.substr(0, (WScript.ScriptFullName.length - WScript.ScriptName.length)),
p = fso.GetFolder(path);
var vsePapki = []; //Массив записей путей ко всем подпапкам.
var nomerProverki=0; //Количество провереных и обработанных папок.
var nomerZapisi=1; // Количество записанных папок в массив.
//12 Вызываем рекурсивную функцию
sFolders(path);
//14 Рекурсивная функция перебора всех папок и подпапок
function sFolders(folder)//полный путь
{
// 17 доступ к объекту-папке
var root = fso.GetFolder(folder);
// 19 Коллекция подпапок
var sfCount = root.SubFolders.Count;
// 21 последовательность подпапок
var seq = new Enumerator(root.SubFolders);
// WScript.Echo("\nКоличество подпапок в корневой папке (" + root + ") = " + sfCount);
// 24 если в текущей папке есть подпапки, то вызываем функцию для каждой подпапки рекурсивно.
while (sfCount>0)
{
for(; !seq.atEnd(); seq.moveNext())
{
// WScript.Echo("Путь к подпапке = " + seq.item().path);
vsePapki[nomerZapisi] = seq.item().path;
nomerZapisi=nomerZapisi+1; // Количество записей в массиве адресов
}
nomerProverki=nomerProverki+1;
WScript.Echo("Номер проверки = " + nomerProverki + " Номер записи = " + [nomerZapisi-1]);
if (nomerProverki>=nomerZapisi)
{
sfCount = 0;
}
else
{
WScript.Echo("ПАПКА НА ПРОВЕРКУ = " + vsePapki[nomerProverki]);
sfCount = sfCount - 1;
sFolders(vsePapki[nomerProverki]);
}
}
}