Всем привет! Подскажите пожалуйста, пытаюсь пообщаться с API посредством 1С, есть вот такой запрос CURL:
curl -i -X POST `
https://graph.facebook.com/v21.0/APPID/messages `
-H 'Authorization: Bearer Token' `
-H 'Content-Type: application/json' `
-d '{ \"messaging_product\": \"whatsapp\", \"to\": \"номер_телефона\", \"type\": \"template\", \"template\": { \"name\": \"hello_world\", \"language\": { \"code\": \"en_US\" } } }'
И вот он же, мною переписанный в 1С:
Соединение = Новый HTTPСоединение("graph.facebook.com",443,"логин","пароль",,30,Новый ЗащищенноеСоединениеOpenSSL());
Токен = "токен";
ЗаголовокЗапросаHTTP = Новый Соответствие();
ЗаголовокЗапросаHTTP.Вставить("Authorization", "Bearer" + Токен);
ЗаголовокЗапросаHTTP.Вставить("Content-Type", "application/json");
ЗапросHTTP = Новый HTTPЗапрос("v21.0/APPID/messages", ЗаголовокЗапросаHTTP);
СтруктураЯзыка = Новый Структура("code","en_US");
СтруктураСообщения = Новый Структура("name,language","hello_world",СтруктураЯзыка);
Данные = Новый Структура("messaging_product,to,type,template","whatsapp","номер_телефона","template",СтруктураСообщения);
ЗаписьJSON = Новый ЗаписьJSON;
ЗаписьJSON.УстановитьСтроку();
ЗаписатьJSON(ЗаписьJSON,Данные);
СтрокаДляТела = ЗаписьJSON.Закрыть();
ЗапросHTTP.УстановитьТелоИзСтроки(СтрокаДляТела);
HTTPОтвет = Соединение.ВызватьHTTPМетод("POST",ЗапросHTTP);
Объект.Ответ = HTTPОтвет.ПолучитьТелоКакСтроку();
Всё ли у меня правильно?
