RE: Как выбрать и обработать файл в 1С с помощью диалога выбора файла?

[Odin — Одинэсник]

Для того чтобы в 1С-обработке выбрать файл из библиотеки ПК и затем выполнять с ним определенные действия, можно использовать диалог выбора файла. Вот пример кода, который демонстрирует, как это сделать:

1С (Код)

1C &НаКлиенте Процедура ВыбратьФайл(Команда) // Создаем диалог выбора файла Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие); Диалог.Заголовок = "Выберите файл"; Диалог.Фильтр = "Все файлы (*.*)|*.*"; // Укажите нужный фильтр Диалог.МножественныйВыбор = Ложь; // Не разрешаем множественный выбор // Открываем диалог и проверяем, был ли выбран файл Если Диалог.Выбрать() Тогда ПутьКФайлу = Диалог.ПолноеИмяФайла; // Получаем полный путь к выбранному файлу Сообщить("Выбран файл: " + ПутьКФайлу); // Здесь можно выполнять действия с файлом // Например, прочитать содержимое файла ПрочитатьФайл(ПутьКФайлу); КонецЕсли; КонецПроцедуры Процедура ПрочитатьФайл(ПутьКФайлу) // Пример чтения содержимого текстового файла Если Файлы.ФайлСуществует(ПутьКФайлу) Тогда ТекстФайла = Новый ТекстовыйДокумент; ТекстФайла.Прочитать(ПутьКФайлу); Сообщить("Содержимое файла: " + ТекстФайла.ПолучитьТекст()); Иначе Сообщить("Файл не найден: " + ПутьКФайлу); КонецЕсли; КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

1C &НаКлиенте Процедура ВыбратьФайл(Команда)     // Создаем диалог выбора файла     Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);     Диалог.Заголовок = "Выберите файл";     Диалог.Фильтр = "Все файлы (*.*)|*.*"; // Укажите нужный фильтр     Диалог.МножественныйВыбор = Ложь; // Не разрешаем множественный выбор       // Открываем диалог и проверяем, был ли выбран файл     Если Диалог.Выбрать() Тогда         ПутьКФайлу = Диалог.ПолноеИмяФайла; // Получаем полный путь к выбранному файлу         Сообщить("Выбран файл: " + ПутьКФайлу);                  // Здесь можно выполнять действия с файлом         // Например, прочитать содержимое файла         ПрочитатьФайл(ПутьКФайлу);     КонецЕсли; КонецПроцедуры   Процедура ПрочитатьФайл(ПутьКФайлу)     // Пример чтения содержимого текстового файла     Если Файлы.ФайлСуществует(ПутьКФайлу) Тогда         ТекстФайла = Новый ТекстовыйДокумент;         ТекстФайла.Прочитать(ПутьКФайлу);         Сообщить("Содержимое файла: " + ТекстФайла.ПолучитьТекст());     Иначе         Сообщить("Файл не найден: " + ПутьКФайлу);     КонецЕсли; КонецПроцедуры

### Объяснение кода:
1. **Создание диалога выбора файла**: Используется класс ДиалогВыбораФайла, который позволяет пользователю выбрать файл на локальном ПК.
2. **Фильтр файлов**: Устанавливается фильтр для отображения только определенных типов файлов (в данном случае все файлы).
3. **Проверка выбора файла**: Если файл был выбран, его полный путь сохраняется в переменной ПутьКФайлу.
4. **Действия с файлом**: В примере показано, как можно прочитать содержимое текстового файла и вывести его на экран.

### Примечание:
— Вы можете адаптировать код для выполнения других действий с файлом, таких как копирование, перемещение, обработка данных и т.д.
— Убедитесь, что у вас есть необходимые права доступа для работы с файлами на локальном ПК.

Этот код можно использовать в обработке 1С, чтобы реализовать функционал выбора и обработки файлов.