Есть каталог АРХ. В нем подкаталоги с именем <<ГГГГММДД>> -
дата создания архива. Нужно перебрать подкаталоги и из каждого
подкаталога выбрать по маске файлы. В 1С7,7 - нет перебора
подкаталогов или я туплю????.

http://www.gr13.ru/old/1c/tango.htm
Книга знаний: Делаем «гляделку» с помощью одинСи. The first part (Preview).

Процедура ПолучитьСписок2(Каталог, ТабЗн)
   Перем А, ПЗ;
   ФСО=СоздатьОбъект("ФС");
   Ф=ФСО.НайтиПервыйФайл(Каталог+"*");
   Пока Ф<>"" Цикл
       
       Если (Ф<>".")И(Ф<>"..") Тогда
           
           ФС.АтрибутыФайла(Каталог+Ф,,А,,,ПЗ);
           Если Сред(А,4,1)="1" Тогда
               ПолучитьСписок2(Каталог+Ф+"\", ТабЗн)
           Иначе
               ТабЗн.НоваяСтрока();
               ТабЗн.ИмяФайла=Каталог+Ф;
               ТабЗн.ДатаИзменения=ПЗ;
               //Сообщить(Каталог+Ф);
           КонецЕсли;
       КонецЕсли;
       
       Ф=ФСО.НайтиСледующийФайл();
   КонецЦикла;
КонецПроцедуры

Типа того

(1) (2) Большое, большое спасибо!!!