Версия для печати темы (https://pro1c.org.ua/index.php?s=3056898fc3a4198627da8d1d55a98c85&showtopic=51044)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Программирование в 1С Предприятие 8.3 _ Скачивание файла

Автор: Inkognito 18.03.19, 11:32

Обычные формы, Бухгалтерия 1.2
Необходимо скачать файл с ресурса ДФС: http://pro1c.org.ua/redirect.php?https://cabinet.sfs.gov.ua/news/82DEC8B9FCEF0290E0530A502807BB23
См.ссылку в тексте http://pro1c.org.ua/redirect.php?https://cabinet.sfs.gov.ua/news/82DEC8B9FCEF0290E0530A502807BB23, вручную чудесно скачивается файл "pdv.zip"

Соединение = Новый HTTPСоединение("cabinet.sfs.gov.ua"); 
Запрос = Новый HTTPЗапрос("ws/api/public/registers/export/pdv/pdv.zip");
Результат = Соединение.Получить(Запрос);
Результат.ПолучитьТелоКакДвоичныеДанные().Записать(КаталогВременныхФайлов() + "pdv.zip");

Проблема: код отрабатывает, но файл пустой.

Автор: nik389 18.03.19, 16:07

все нормально отрабатывает, проверил:

ssl = Новый ЗащищенноеСоединениеOpenSSL();
Соединение = Новый HTTPСоединение("cabinet.sfs.gov.ua",,,,,,ssl);
Запрос = Новый HTTPЗапрос("ws/api/public/registers/export/pdv");
Результат = Соединение.Получить(Запрос);
ДанныеССайта = Результат.ПолучитьТелоКакДвоичныеДанные();
ДанныеССайта.Записать("d:\Temp\100.zip");

Автор: Inkognito 18.03.19, 16:17

nik389
Спасибо, заработало.

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua