Открыть диалог выбора каталога

 Режим = РежимДиалогаВыбораФайла.ВыборКаталога; 

ДиалогОткрытия = Новый ДиалогВыбораФайла(Режим); 

ДиалогОткрытия.Каталог = ""; 

ДиалогОткрытия.МножественныйВыбор = Ложь; 

ДиалогОткрытия.Заголовок = "Выберите каталог"; 



Если ДиалогОткрытия.Выбрать() Тогда 

	ПутьККаталогу = ДиалогОткрытия.Каталог; 

КонецЕсли;   

 

Процедура ВыборКат()

Если  ФС.ВыбратьКаталог(ИмяПути, "Выберите каталог")=1 Тогда

  Путь = имяПути;

КонецЕсли;

КонецПроцедуры