Проверка существования файла, директории

Функция РаботаСФайлом(ИмяФайла)<br />
Файл = Новый Файл(ИмяФайла);<br />
Если Файл.Существует() Тогда<br />
Ответ = Вопрос(«Перезаписать существующий файл?»,<br />
РежимДиалогаВопрос.ДаНет);<br />
Если Ответ КодВозвратаДиалога.Да Тогда<br />
Возврат Ложь;<br />
КонецЕсли;<br />
КонецЕсли;</p>
<p>//работаем с файлом по полной…</p>
<p>КонецФункции</p>
<p>Функция ПроверитьСуществованиеКаталога(ИмяКаталога) Экспорт<br />
КаталогНаДиске = Новый Файл(ИмяКаталога);<br />
Если КаталогНаДиске.Существует() Тогда<br />
Возврат Истина;<br />
Иначе<br />
Ответ = Вопрос(«Каталог не существует. Создать?»,<br />
РежимДиалогаВопрос.ОКОтмена);<br />
Если Ответ = КодВозвратаДиалога.ОК Тогда<br />
СоздатьКаталог(ИмяКаталога);<br />
Возврат Истина;<br />
Иначе<br />
Возврат Ложь;<br />
КонецЕсли;<br />
КонецЕсли;<br />
КонецФункции

Проверка существования файла на клиенте УФ

&НаКлиенте<br />
Процедура ПроверкаСуществованияФайла(Команда)<br />
Файл = Новый Файл(«Секретные данные.xls»);<br />
Оповещение = Новый ОписаниеОповещения(«ПослеНачалаПроверки», ЭтотОбъект);<br />
Файл.НачатьПроверкуСуществования(Оповещение);<br />
КонецПроцедуры</p>
<p>&НаКлиенте<br />
Процедура ПослеНачалаПроверки( Существует, ДопПараметры)<br />
Если Существует Тогда<br />
//Надо тырить, не забудьте передать имя файла<br />
КонецЕсли;<br />
КонецПроцедуры