Подключить расширение для работы файлами. Предлагает пользователю установить расширение работы с файлами в веб-клиенте.
// Предлагает пользователю установить расширение работы с файлами в веб-клиенте.
// Предназначена для использования в начале участков кода, в которых ведется работа с файлами.
//
// Параметры:
// ОписаниеОповещенияОЗакрытии - ОписаниеОповещения - описание процедуры, которая будет вызвана после закрытия
// формы со следующими параметрами:
// - РасширениеПодключено - Булево - Истина, если расширение было подключено.
// - ДополнительныеПараметры - Произвольный - параметры, заданные в ОписаниеОповещенияОЗакрытии.
// ТекстПредложения - Строка - текст сообщения. Если не указан, то выводится текст по умолчанию.
// ВозможноПродолжениеБезУстановки - Булево - если Истина, будет показана кнопка ПродолжитьБезУстановки,
// если Ложь, будет показана кнопка Отмена.
//
// Пример:
//
// Оповещение = Новый ОписаниеОповещения("ПечатьДокументаЗавершение", ЭтотОбъект);
// ТекстСообщения = НСтр("ru = 'Для печати документа необходимо установить расширение работы с файлами.'");
// ФайловаяСистемаКлиент.ПодключитьРасширениеДляРаботыСФайлами(Оповещение, ТекстСообщения);
//
// Процедура ПечатьДокументаЗавершение(РасширениеПодключено, ДополнительныеПараметры) Экспорт
// Если РасширениеПодключено Тогда
// // код печати документа, рассчитывающий на то, что расширение подключено.
// // ...
// Иначе
// // код печати документа, который работает без подключенного расширения.
// // ...
// КонецЕсли;
//
Процедура ПодключитьРасширениеДляРаботыСФайлами(
ОписаниеОповещенияОЗакрытии,
ТекстПредложения = "",
ВозможноПродолжениеБезУстановки = Истина) Экспорт
ОписаниеОповещенияЗавершение = Новый ОписаниеОповещения(
"НачатьПодключениеРасширенияРаботыСФайламиПриОтветеНаВопросОбУстановке", ФайловаяСистемаСлужебныйКлиент,
ОписаниеОповещенияОЗакрытии);
#Если Не ВебКлиент Тогда
// В мобильном, тонком и толстом клиентах расширение подключено всегда.
ВыполнитьОбработкуОповещения(ОписаниеОповещенияЗавершение, "ПодключениеНеТребуется");
Возврат;
#КонецЕсли
Контекст = Новый Структура;
Контекст.Вставить("ОписаниеОповещенияЗавершение", ОписаниеОповещенияЗавершение);
Контекст.Вставить("ТекстПредложения", ТекстПредложения);
Контекст.Вставить("ВозможноПродолжениеБезУстановки", ВозможноПродолжениеБезУстановки);
Оповещение = Новый ОписаниеОповещения(
"НачатьПодключениеРасширенияРаботыСФайламиПриУстановкеРасширения", ФайловаяСистемаСлужебныйКлиент, Контекст);
НачатьПодключениеРасширенияРаботыСФайлами(Оповещение);
КонецПроцедуры
///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////
РасширениеРаботыСФайламиПодключено (БСП)
ПроверитьРасширениеРаботыСФайламиПодключеноЗавершение (БСП)
ПроверитьРасширениеРаботыСФайламиПодключено (БСП)
ПродолжитьВыполнениеКомандыПослеУстановкиРасширенияРаботыСФайлами (БСП)
НачатьПодключениеРасширенияРаботыСФайламиПриУстановкеРасширения (БСП)
ВыбратьИПередатьФайлНаСервер (БСП)
ПоказатьПомещениеФайлаПриПодключенииРасширенияРаботыСФайлами (БСП)
ПоказатьПолучениеФайловПриПодключенииРасширенияРаботыСФайлами (БСП)
Канал FastCode 1C в Телеграм! Шаблоны кода, статьи, полезные советы, курсы по 1С (8К участников)