Пример работы с архивом в 1с

[MuI_I_Ika]

Код Выделить Развернуть

Архив = Новый ЗаписьZipФайла(ИмяФайлаАрхива, Пароль);
ИмяФайла = ПолучитьИмяВременногоФайла();
ТекстовыйДокумент = Новый ТекстовыйДокумент(); 
ТекстовыйДокумент.УстановитьТекст("Текст, который мы будем запаковывать");
ТекстовыйДокумент.Записать(ИмяФайла);
Архив.Добавить(ИмяФайла);
Архив.Записать();

ДвоичныеДанные = Новый ДвоичныеДанные(ИмяФайлаАрхива);
ХЗ = Новый ХранилищеЗначения(ДвоичныеДанные);


УдалитьФайлы(ИмяФайла);
УдалитьФайлы(ИмяФайлаАрхива);