Имя: Пароль:
1C
1С v8
1C 8.2 как открыть все файлы (таблицы mxl) в каталоге без диалога открытия файла
,
0 Andrey400
 
15.07.15
00:20
1С 8.2 УТ 10.3. в конкретной папке на диске есть файлы mxl (расходные накладные) около 5000 штук. написал обработку (текст ниже) которая выводит диалог открытия файла, там я нажимаю CTRL+A и Enter и все ссылки на файлы попадают в таблицу "файлы" после чего я могу с ними спокойно работать.
Цель: НЕВЫВОДИТЬ диалог открытия файлов ! а просто чтобы в мою таблицу попали все файлы конкретной папки (одним нажатием кнопки), так можно сделать ?

Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
Диалог.МножественныйВыбор = Истина;
Диалог.Заголовок = "Выберите файл";
Диалог.Каталог = "D:\History\RN\";
    
Если Диалог.Выбрать() Тогда
    МассивФайлов = Диалог.ВыбранныеФайлы;
    Для Каждого ИмяФайла Из МассивФайлов Цикл
        ВыбФайл = Новый Файл(ИмяФайла);
    ФайлТС = Файлы.Добавить();
    ФайлТС.Файл = ИмяФайла;
    КонецЦикла;
КонецЕсли;
1 Lexey_
 
15.07.15
00:28
(0) НайтиФайлы() тебе поможет
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.