1C фаилы

&НаКлиенте

Процедура ПутьКФайлуНачаловыбора (Элемент, ДанныеВыбора, СтандартнаяОбработка)

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

	Проводник.Заголовок = "Выберите файл с контрагентами";

	Если Объект.ФорматФайла = "TXT" Тогда
		Фильтр = "Текстовый документ (*.txt) |*.txt";
	ИначеЕсли Объект.ФорматФайла = "CSV" Тогда
		Фильтр = "Текстовый документ (*.csv) |*.csv";
	ИначеЕсли Объект.ФорматФайла = "XLS" Тогда
		Фильтр = "Файл Excel (*.xls) |*.xls";
	ИначеЕсли Объект.ФорматФайла = "DBF" Тогда
		Фильтр = "Таблица DBF (*.dbf) |*.dbf"
	ИначеЕсли Объект.ФорматФайла = "XML" Тогда
		Фильтр = "XML-файл (*.xml) |*.xml"
	Иначе
		Возврат;
	Конецесли;

	Проводник.Фильтр = Фильтр;

	Оповещение = Новый ОписаниеОповещения("ПослеВыбораФайла", ЭтотОбъект);
	Проводник.Показать(Оповещение);

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

&НаКлиенте
Процедура ПослеВыбораФайла (ВыбранныеФайлы, ДополнительныеПараметры) Экспорт

	Если ВыбранныеФайлы = Неопределено Тогда
		Возврат;
	КонецЕсли;

	Объект.ПутьКФайлу = ВыбранныеФайлы [0];

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