Имя: Пароль:
1C
 
http запросы 1C8
0 cyberandr2022
 
31.10.22
11:56
Всем привет!
Подскажите - с POST запросами нужен обмен с WILLBERIS
Заголовки=новый Соответствие();
Заголовки.Вставить("Authorization",Токен);
Заголовки.Вставить("Content-Type","application/json");
Заголовки.Вставить("accept","application/json");

SSL_Соединение=Новый ЗащищенноеСоединениеOpenSSL();

PostStrola ="{"+""""+ "sort"+ """"+ ": {"+ """"+ "limit"+ """"+ ": 50,"+""""+ "offset"+ """" +": 0,"+""""+ "searchValue"+ """"+ ":"+ """"+ ","+""""+ "sortColumn" +""""+":"+ """"+"updateAt"+""""+","+""""+"ascending"+""""+": false}}";
//  Запрос = {"sort": {"limit": 50,"offset": 0,"searchValue": "","sortColumn": "updateAt","ascending": false}};
  
Http = Новый HTTPСоединение("suppliers-api.wildberries.ru",,,,,,SSL_Соединение);
СтрокаЗапроса = "/content/v1/cards/list/content/v1/cards/list";
HTTPЗапрос = Новый HTTPЗапрос(СтрокаЗапроса,Заголовки);
HTTPЗапрос.УстановитьТелоИзСтроки(PostStrola,КодировкаТекста.UTF8);

Ответ =  Http.Получить(HTTPЗапрос);
Если Ответ.КодСостояния=200 Тогда
    Сообщить("Все ок");
Иначе
    Сообщить(Ответ.КодСостояния);
КонецЕсли;

или так

HTTPЗапрос = Новый HTTPЗапрос(СтрокаЗапроса,Заголовки);

HTTPЗапрос.УстановитьТелоИзСтроки(PostStrola,КодировкаТекста.UTF8);
ОтветHTTP = Http.ОтправитьДляОбработки(HTTPЗапрос);
    ОтветКод = ОтветHTTP.КодСостояния;
        Сообщить(ОтветКод);
        Если ОтветКод <> 200 Тогда
            
        КонецЕсли;
Получаю Кодответа =400
1 vicof
 
31.10.22
12:00
Мне лень считать кавычки. Но может таки воспользуешься встроенной в 1с json библиотекой?
2 ttk
 
31.10.22
12:03
(1)+
(0), а ошибка начинается после "searchValue":
3 Kassern
 
31.10.22
12:04
(0) Сегодня уже тема была Помогите с JSON
4 cyberandr2022
 
31.10.22
12:23
да спасибо. Что-то не сообразил через json стандартный сделать. Я больше думал не так методы вызываю
5 Builder
 
31.10.22
12:26
(0) Чет прям всех со страшной силой в маркетплейсы потянуло :)
6 Волшебник
 
модератор
31.10.22
12:47
(5) Продажи — основа бизнеса.
7 Kassern
 
31.10.22
13:29
(5) Просто "все" еще не вкусили "прелести" работы с этими МП...МЫ уже который суд с ВБ ведем, один уже выиграли.
AdBlock убивает бесплатный контент. 1Сергей