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

ДиалогОткрытияФайла.Выбрать(); 



Файл = Новый Файл(ДиалогОткрытияФайла.ПолноеИмяФайла); 

Текст = "Файл: " + Файл.Имя; 

Текст = Текст + Символы.ПС + "Расширение: " + Файл.Расширение; 

Текст = Текст + Символы.ПС + "Полное имя: " + Файл.ПолноеИмя; 

Текст = Текст + Символы.ПС + "Путь: " + Файл.Путь; 

Текст = Текст + Символы.ПС + "Размер: " + Файл.Размер() + " байт"; 

Текст = Текст + ?(Файл.ПолучитьНевидимость(), Символы.ПС + "Невидимый. ", ""); 

Текст = Текст + ?(Файл.ПолучитьТолькоЧтение(), Символы.ПС + "Только чтение.", ""); 

Текст = Текст + Символы.ПС + "Последнее изменение: " + Файл.ПолучитьВремяИзменения(); 

Сообщить(Текст);   

 Сообщить("ИНФОРМАЦИЯ О ОТКРЫТОМ ФАЙЛЕ!","I");

Сообщить("Путь к открытому файлу - " + папк + файл);

ИмяВыбрФайла=папк+файл;

ФС.АтрибутыФайла(ИмяВыбрФайла, A, B, C, D, E, F);

сообщить("Размер Файла - "+A);

сообщить("Количество записей - "+НомС + " , Количество полей - "+КолП ,"!");

сообщить("Время Создания - " + C);

сообщить("Время Последннго Доступа - " + D);

сообщить("Время Последней Записи - " + E);

сообщить("Расширенное Имя Файла - "+ F);

  //На форме есть поле (Путь к файлу), для кнопки Выбор (Событие начало выбора) пропишем процедуру выбора файла

Процедура ВыборФайла(Элемент, ВыбранноеЗначение, СтандартнаяОбработка)

	СтандартнаяОбработка=ложь;

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

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

	Диалог.ПолноеИмяФайла = ""; 

	Фильтр = "EXE (*.exe)|*.exe"; 

	Диалог.Фильтр = Фильтр; 

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

	Диалог.Каталог = "F:\";

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

		Элемент.значение = Диалог.ПолноеИмяФайла;

	КонецЕсли;

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

 ИмяВыбрФайла = "";

ИмяПути=КаталогИБ()+"ProgFile\";

   Если ФС.ВыбратьФайл(0, ИмяВыбрФайла, ИмяПути, "Выберите файл запуска программы", "Все файлы (*.*)!*.*", , ) = 1 Тогда

     ПутьЗ=СРЕД((ИмяПути + ИмяВыбрФайла),3,80);

 КонецЕсли;