Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 8 общая

Не работает POST-запрос

Не работает POST-запрос
Я
   Chrome0102
 
03.10.18 - 18:21
Доброго времени суток,

8.3.10.2667

Не могу заставить POST-запрос работать из 1С. Curl работает. Проверял в Insomnia. Возвращает 200 и JSON  с необходимыми для работы параметрами.

curl --request POST \
  --url https://dev.shop-loyalty.ru:443/auth/signin/password/ \
  --header 'accept: application/json' \
  --header 'content-type: application/json' \
  --header 'x-cid: 899e9951-1424-44b1-9287-9be4d203ef07' \
  --header 'x-token: 5ee6929d-0bd3-4067-9110-f63d2e2f976f' \
  --data '{
  "value": "ofmarket-test",
  "type": "login",
  "password": "LG67BpYioxfooMP9"
}'


Мой код в 1С:

ИмяФайлаЗапроса = ПолучитьИмяВременногоФайла(".json");
                
        СтруктураДляJSON = Новый Структура;
        СтруктураДляJSON.Вставить("value", "ofmarket-test");
        СтруктураДляJSON.Вставить("type", "login");
        СтруктураДляJSON.Вставить("password", "LG67BpYioxfooMP9");
        
        ЗаписьJSON = Новый ЗаписьJSON;
        ПараметрыЗаписи = Новый ПараметрыЗаписиJSON(, Символы.ВТаб);
        ЗаписьJSON.ОткрытьФайл(ИмяФайлаЗапроса, , , ПараметрыЗаписи);
        ЗаписатьJSON(ЗаписьJSON, СтруктураДляJSON);
        ЗаписьJSON.Закрыть();
        
        Соединение = Новый HTTPСоединение("dev.shop-loyalty.ru",443,,,,, Новый ЗащищенноеСоединениеOpenSSL);
        
        СоответствиеЗаголовков = Новый Соответствие;
        
        СоответствиеЗаголовков.Вставить("accept", "application/json");
        СоответствиеЗаголовков.Вставить("content-type", "application/json");
        СоответствиеЗаголовков.Вставить("x-cid", "899e9951-1424-44b1-9287-9be4d203ef07");
        СоответствиеЗаголовков.Вставить("x-token", "5ee6929d-0bd3-4067-9110-f63d2e2f976f");
    
        HTTPЗапрос = Новый HTTPЗапрос("/auth/signin/password/", СоответствиеЗаголовков);
    
        HTTPЗапрос.УстановитьТелоИзСтроки(ЗаписьJSON);
        
        Результат  = Соединение.ОтправитьДляОбработки(HTTPЗапрос);
        
        Соединение = Неопределено;
        
        Ответ = Результат.ПолучитьТелоКакСтроку("UTF-8");


Возвращает: {"code":1001,"message":"Cannot decode input JSON"}

Вот где я косячу? Не понимаю! Тыкните мордой пожалуйста...
 
 
   sechs
 
1 - 03.10.18 - 18:53
HTTPЗапрос.УстановитьТелоИзСтроки(ЗаписьJSON);
   Затейник
 
2 - 03.10.18 - 18:56
HTTPСоединение + API
Вот я тоже что-то делал, может поможет
   oleg_km
 
3 - 03.10.18 - 19:34
Фидлером сравни

Список тем форума
Рекламное место пустует  Рекламное место пустует
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Э. Йодан
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Рекламное место пустует