Уведомления
Очистить все

Нормальное позиционирование на файле в диалоге выбора файла, вызванного из формы. 1С

1 Записи
1 Пользователи
0 Likes
237 Просмотры
96-150 Okolokompa Форум
(@sadovod)
Prominent Member
Присоединился: 4 года назад
Записи: 258
Создатель темы  

На форме - строковый реквизит "ФормИмяФайла", в него собственно и записывается результат выбора, он же и разбирается при повторном выборе.

Процедура ВыборФайла()
	
	ИмяФайла = СокрЛП(ФормИмяФайла);
	ИмяКаталога = "";
	КолКаталогов = СтрЧислоВхождений(ИмяФайла,"\");
	
	Для а = 1 по КолКаталогов Цикл
		ИмяФайла = Сред(ИмяФайла,Найти(ИмяФайла,"\") + 1);
	КонецЦикла;
	
	ИмяКаталога = Лев(ФормИмяФайла,СтрДлина(ФормИмяФайла) - СтрДлина(ИмяФайла));
	ФС.ВыбратьФайл(0,ИмяФайла,ИмяКаталога,"Выберите файл загрузки","*.xls","*.xls");
	ФормИмяФайла = ИмяКаталога + ИмяФайла;
	
КонецПроцедуры

   
Цитата
Поделиться: