Total Commander :: Найти папки с большим кол-ством файлов, находимых при поиске

Найти папки с большим кол-ством файлов, находимых при поиске

through

FAQ

[^/[Print]\]
Goto page Previous 1, 2, 3, 4 :| |:
Total Commander -> Автоматизация Total Commander

#46: Author: Flasher, Location: Москва

Posted: Wed Jul 13, 2016 22:12
—
Hjkma
Добавил Then. Это я вручную правил, пардон. Rolling Eyes

#47: Author: Hjkma,

Posted: Wed Jul 13, 2016 22:45
—
Flasher
Опять ошибка вызвалась

Quote:

Строка: 37 Символ: 25 Ошибка: Переменная не определена: 'ForFolder'

#48: Author: Flasher, Location: Москва

Posted: Wed Jul 13, 2016 22:55
—
Исправил.

#49: Author: Hjkma,

Posted: Thu Jul 14, 2016 00:42
—
Flasher
Потестил и мне по моему ощущению не показалось, что новый скрипт демонстрирует большую прибавку к скорости. Также как и по-прежнему на обработку больших папок с кучей подпапок уходит много времени. Ну завтра буду полноценно с секундомером тестировать оба варианта скрипта, тогда станет ясно какой вариант будет скоростнее.

#50: Author: Flasher, Location: Москва

Posted: Thu Jul 14, 2016 01:05
—
Hjkma
Я же написал, что не думаю, что скажется существенно на больших объёмах. Альтернативный же вариант я только предложил, если возникнет (не у меня) желание.
Если нужно узнать затраченное время, то следом за 5-й строкой нужно дабавить

Code:

Dim T : T = Timer

, а за 27-й

Code:

MsgBox "Затраченное время: " & Timer - T & " секунд(ы)", 4160

Total Commander -> Автоматизация Total Commander

output generated using printer-friendly topic mod. All times are GMT + 4 Hours

Goto page Previous 1, 2, 3, 4 :| |: Page 4 of 4