Выгрузить Excel или прекратить работу приложения
Пример кода для прекращения работы Microsoft Excel и освобождения занимаемой этим приложением оперативной памяти.
Также указываются данные диалога для открытия файла Excel и обработка открываемого файла.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Выбор = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие); Выбор.Заголовок = "Выберите файл фомата XLS(XLSX)"; Выбор.ПолноеИмяФайла = ""; Выбор.МножественныйВыбор = Ложь; Выбор.Фильтр = "Файл XLS(*.xls)|*.xls"; Если Выбор.Выбрать() Тогда Путь= Выбор.Каталог; Имя= Выбор.ПолноеИмяФайла; КонецЕсли; Попытка РежимВопроса = РежимДиалогаВопрос.ДаНетОтмена; Ответ = Вопрос("Загрузить данные?", РежимВопроса, 0); Если Ответ = КодВозвратаДиалога.Да Тогда ОбработатьНаСервере(Имя); КомандаСистемы("taskkill /F /IM excel.exe"); КонецЕсли; Сообщить(">>Обработан файл: " + Имя); Исключение Сообщить("!Возникли проблемы при обработке файла: " + Имя); КонецПопытки; |
Если у Вас появились вопросы по статье или остались нерешенные проблемы обсудить их Вы можете на Форуме 1С Вопросы и ответы
(1 голосов, 5,00 из 5)
Загрузка...
Добавить комментарий
Для отправки комментария вам необходимо авторизоваться.