1С 8.x : Как найти файлы в иерархии заданного каталога?

 // Параметры:

//  Путь         – Строка;

//  Маска        – Строка.

//

// Возвращаемое значение:

//  Массив – элементы типа Файл.

//

Функция НайтиФайлыВИерархии(Путь, Маска) Экспорт

	

	НайденныеКаталоги = НайтиФайлы(Путь, "*.*");

	МассивРезультатов = Новый Массив;

	Для каждого НайденныйФайл Из НайденныеКаталоги Цикл

		Если НайденныйФайл.ЭтоКаталог() Тогда

			МассивРезультатов.Добавить(НайтиФайлыВИерархии(НайденныйФайл.ПолноеИмя, Маска));

		КонецЕсли; 

	КонецЦикла;

	МассивРезультатов.Добавить(НайтиФайлы(Путь, Маска));

	Результат = Новый Массив;

	Для Каждого ЭлементРезультат Из МассивРезультатов Цикл

		Для Каждого Файл Из ЭлементРезультат Цикл

			Результат.Добавить(Файл);

		КонецЦикла; 

	КонецЦикла;

	Возврат Результат;

	

КонецФункции