Добавил Then. Это я вручную правил, пардон.
Найти папки с большим кол-ством файлов, находимых при поиске
Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер
Flasher
Потестил и мне по моему ощущению не показалось, что новый скрипт демонстрирует большую прибавку к скорости. Также как и по-прежнему на обработку больших папок с кучей подпапок уходит много времени. Ну завтра буду полноценно с секундомером тестировать оба варианта скрипта, тогда станет ясно какой вариант будет скоростнее.
Потестил и мне по моему ощущению не показалось, что новый скрипт демонстрирует большую прибавку к скорости. Также как и по-прежнему на обработку больших папок с кучей подпапок уходит много времени. Ну завтра буду полноценно с секундомером тестировать оба варианта скрипта, тогда станет ясно какой вариант будет скоростнее.
Hjkma
Я же написал, что не думаю, что скажется существенно на больших объёмах. Альтернативный же вариант я только предложил, если возникнет (не у меня) желание.
Если нужно узнать затраченное время, то следом за 5-й строкой нужно дабавить, а за 27-й
Я же написал, что не думаю, что скажется существенно на больших объёмах. Альтернативный же вариант я только предложил, если возникнет (не у меня) желание.
Если нужно узнать затраченное время, то следом за 5-й строкой нужно дабавить
Код: Выделить всё
Dim T : T = TimerКод: Выделить всё
MsgBox "Затраченное время: " & Timer - T & " секунд(ы)", 4160Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.