Скачать файл из телеграмм

Процедура СкачатьФайл(СтруктураНастроек, id_file)
////////////////////////////////////////////////////////////­///////////////// Определение пути к файлу
Ресурс = "/bot" + СтруктураНастроек.token + "/getfile?file_id=" + id_file;
Соединение = Новый HTTPСоединение(СтруктураНастроек.api,443,,,,,Новый ЗащищенноеСоединениеOpenSSL());

Запрос = Новый HTTPЗапрос(Ресурс);
Ответ = Соединение.Получить(Запрос);

ДДСО= Ответ.ПолучитьТелоКакСтроку();//ДвоичныеДанныеСтрокаОтвета

Если Найти(ДДСО,"photo/") Тогда
ПутьКФалу = Сред(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024),0,СтрДлина(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024))-3);
ИмяСохраненияДляФайла = Сред(Сред(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024),0,СтрДлина(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024))-3),8,1024);

ИначеЕсли Найти(ДДСО,"documents/") Тогда
ПутьКФалу = Сред(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024),0,СтрДлина(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024))-3);
ИмяСохраненияДляФайла = Сред(Сред(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024),0,СтрДлина(Сред(ДДСО, Найти(ДДСО,"""file_path""") +13 ,1024))-3),11,1024);

КонецЕсли;

////////////////////////////////////////////////////////////­///////////////// Скачивание самого файла

Ресурс = "htpps://" + СтруктураНастроек.api + "/file/bot" + СтруктураНастроек.token + "/" + СтрЗаменить(ПутьКФалу,"\","/");
КопироватьФайл(Ресурс,"C:\Files\" + ИмяСохраненияДляФайла);

КонецПроцедуры