//Функция Проверяет наличие каталога на диске и предлагает создать, если каталога не существует. // // Параметры // ИмяКаталога – Строка, содержащая путь к каталогу файла на диске. // // Возвращаемое значение: // Булево – Истина, если каталог существует или создан, Ложь, если каталога нет. // Функция ПроверитьСуществованиеКаталога(ИмяКаталога) Экспорт КаталогНаДиске = Новый Файл(ИмяКаталога); Если КаталогНаДиске.Существует() Тогда Возврат Истина; Иначе Ответ = Вопрос("Указанный каталог не существует. Создать каталог?", РежимДиалогаВопрос.ОКОтмена); Если Ответ = КодВозвратаДиалога.ОК Тогда СоздатьКаталог(ИмяКаталога); Возврат Истина; Иначе Возврат Ложь; КонецЕсли; КонецЕсли; КонецФункции
