1С 8.3 БСП СохранитьФайлы
Данные > 1С 8.3 БСП > Файлы (сохранение)
Перейти в раздел примеры кода 1С 8.3:
1С 8.3 БСП СохранитьФайлы. Получает файлы и сохраняет их в локальную файловую систему пользователя. Для сохранения файлов в неинтерактивном режиме свойство Имя параметра СохраняемыеФайлы должно содержать полный путь к сохраняемому файлу или, если свойство Имя содержит только имя файла с расширением, необходимо заполнить свойство Каталог элемента Диалог параметра ПараметрыСохранения. В иных случаях будет вызвано исключение.
Примера кода от rayastar
&НаКлиенте
Процедура ГиперссылкаСохранитьНажатие(Элемент)
ДанныеПротокола = РезультатПолученияПротокола.ДанныеПротокола;
Шаблон = НСтр("ru='ОписаниеОшибки_%1_%2'");
ИмяФайла = СтрШаблон(Шаблон, Банк, Организация);
ИмяФайла = ОбщегоНазначенияКлиентСервер.ЗаменитьНедопустимыеСимволыВИмениФайла(ИмяФайла, "");
Файлы = Новый Массив;
Описание = Новый ОписаниеПередаваемогоФайла;
Описание.Имя = ИмяФайла + ".xml";
Описание.Хранение = ПоместитьВоВременноеХранилище(ДанныеПротокола);
Файлы.Добавить(Описание);
Если РезультатПолученияПротокола.ДанныеПодписи <> Неопределено Тогда
Описание = Новый ОписаниеПередаваемогоФайла;
Описание.Имя = ИмяФайла + ".sig";
Описание.Хранение = ПоместитьВоВременноеХранилище(РезультатПолученияПротокола.ДанныеПодписи);
Файлы.Добавить(Описание);
КонецЕсли;
ФайловаяСистемаКлиент.СохранитьФайлы(,Файлы);
КонецПроцедуры
Процедура ГиперссылкаСохранитьНажатие(Элемент)
ДанныеПротокола = РезультатПолученияПротокола.ДанныеПротокола;
Шаблон = НСтр("ru='ОписаниеОшибки_%1_%2'");
ИмяФайла = СтрШаблон(Шаблон, Банк, Организация);
ИмяФайла = ОбщегоНазначенияКлиентСервер.ЗаменитьНедопустимыеСимволыВИмениФайла(ИмяФайла, "");
Файлы = Новый Массив;
Описание = Новый ОписаниеПередаваемогоФайла;
Описание.Имя = ИмяФайла + ".xml";
Описание.Хранение = ПоместитьВоВременноеХранилище(ДанныеПротокола);
Файлы.Добавить(Описание);
Если РезультатПолученияПротокола.ДанныеПодписи <> Неопределено Тогда
Описание = Новый ОписаниеПередаваемогоФайла;
Описание.Имя = ИмяФайла + ".sig";
Описание.Хранение = ПоместитьВоВременноеХранилище(РезультатПолученияПротокола.ДанныеПодписи);
Файлы.Добавить(Описание);
КонецЕсли;
ФайловаяСистемаКлиент.СохранитьФайлы(,Файлы);
КонецПроцедуры
// Автор библиотеки: ООО "1С-Софт". Все права защищены © 2021
// Типовая конфигурация Библиотека стандартных подсистем (далее - БСП)
// Код БСП распространяется по лицензии Attribution 4.0 International (CC BY 4.0):
// ссылка на лицензию: https://creativecommons.org/licenses/by/4.0/legalcode
// Код БСП распространяется по лицензии Attribution 4.0 International (CC BY 4.0):
// ссылка на лицензию: https://creativecommons.org/licenses/by/4.0/legalcode
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник