Отправка данных на сайт post - запросом в формате JSON

11.09.17

Интеграция - WEB-интеграция

Пример использования стандартных механизмов платформы 1С, начиная с версии 8.3.6.1977.

Скачать исходный код

Наименование Файл Версия Размер
Отправка данных на сайт post - запросом в формате JSON :
.epf 8,07Kb
57
.epf 8,07Kb 57 Скачать

JSON (JavaScript Object Notation) это текстовый формат обмена данными, широко используемый в веб-приложениях. По сравнению с XML он является более лаконичным и занимает меньше места. Кроме этого все браузеры имеют встроенные средства для работы с JSON.

Необходимость работы с этим форматом на уровне платформы обусловлена не только тем, что это «модный современный» формат, который прикладные решения 1С:Предприятия сами по себе могут использовать для интеграции со сторонними приложениями. Другая причина заключается ещё и в том, что JSON активно используется в HTTP интерфейсах. А в 1С:Предприятии как раз есть такие механизмы, в которых хочется использовать этот формат. Это REST интерфейс приложения, автоматически генерируемый платформой, и HTTP-сервисы, которые вы можете создавать самостоятельно. (источник: http://v8.1c.ru/o7/201410json/index.htm). 

 

Простой код отправки данных выглядит так:

//здесь выполняем запрос, в котором есть данные о нашых товарах (код товара (sku), 
//Наименование товара(name), цена(price) и остаток(qty))
Результат = Запрос.Выполнить();

    ВыборкаДетальныеЗаписи = Результат.Выбрать();
    

    //Создали запись ЗаписьJSON
    ЗаписьJSON = Новый ЗаписьJSON;
    //Задаем параметры без переноса строк, можно и с переносом, как кому нравится
    тПараметрыJSON = Новый ПараметрыЗаписиJSON(ПереносСтрокJSON.Нет, " ", Истина);  
    ЗаписьJSON.УстановитьСтроку(тПараметрыJSON); 
    
    
    МассивДанныхJSON = Новый Массив;
    СтруктураДанныхJSON = Новый Структура; 

    //Выбираем данные из запроса и записываем в массив "МассивДанныхJSON"       

    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл 
       // Каждая запись товара у нас отдельная структура...
              тДанные = Новый Структура;
                тДанные.Вставить("sku", ВыборкаДетальныеЗаписи.sku);
                тДанные.Вставить("name", ВыборкаДетальныеЗаписи.name);
                тДанные.Вставить("price", ВыборкаДетальныеЗаписи.price);
                тДанные.Вставить("qty", ВыборкаДетальныеЗаписи.qty);
       //Добавляем структуру с информацией о товаре в наш массив "МассивДанныхJSON" 
               МассивДанныхJSON.Добавить(тДанные);
                
    КонецЦикла;    
    // вставляем наш массив в ещеодну структуру
    СтруктураДанныхJSON.Вставить("test", МассивДанныхJSON);

    ЗаписатьJSON(ЗаписьJSON, СтруктураДанныхJSON);
    //Здесь нам платформа переделала нашу сложную структуру в строку данных в формате JSON 
    СтрокаJS = ЗаписьJSON.Закрыть();
    //В этот файл для примера наш сайт сформирует ответ после отправки на него данных методом POST
    ФайлОтвета = КаталогВременныхФайлов()+ "\answer.txt";
  
    //здесь надо указать путь к сайту
    HTTPСоединение = Новый HTTPСоединение("mysite.com/download.php");
    //создаем запрос данных методом POST
    запросPOST = Новый HTTPЗапрос("POST"); 
    
//это обязательный заголовок тела запроса
    запросPOST.Заголовки.Вставить("Content-type", "application/x-www-form-urlencoded");
//Здесь задаем текст нашей отформатированной строки + задаем формат сроки 
    запросPOST.УстановитьТелоИзСтроки("mData="+СтрокаJS,"windows-1251",ИспользованиеByteOrderMark.НеИспользовать);
    
    
    
    Попытка
//Отправляем для обрааботки на наш сервер
        HTTPСоединение.ОтправитьДляОбработки(запросPOST, ФайлОтвета);
            
    Исключение
        #Если клиент Тогда
           Сообщить(ОписаниеОшибки());
        #КонецЕсли   
    КонецПопытки;

 

Обработка выгрузка сайт POST JSON

См. также

Интеграция 1С — Битрикс24. Обмен задачами

Сайты и интернет-магазины Интеграция WEB-интеграция Платформа 1С v8.3 Конфигурации 1cv8 Управленческий учет Платные (руб)

Интеграция 1С и Битрикс24. Разработка имеет двухстороннюю синхронизацию 1С и Битрикс24 задачами. Решение позволяет создавать пользователя в 1С из Битрикс24 и наоборот. Данная разработка технически подходит под все основные конфигурации линейки продуктов 1С:Предприятие 8.3 (8.3.18.1289). При приобретении предоставляется 1 месяц бесплатных обновлений разработки. Доступна демо-версия продукта с подключением Вашего Битрикс24

5040 руб.

04.05.2021    17849    6    15    

13

[Расширение] БОР-Навигатор.Культура

Зарплата Бюджетный учет WEB-интеграция Обмен с ГосИС Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бюджетный учет Платные (руб)

Расширение конфигурации, включающее в себя объекты, необходимые для подготовки и сдачи отчета "Штатная численность" системы "БОР-Навигатор.Культура" в программе "1С:Зарплата и кадры государственного учреждения", редакция 3.1.

8400 руб.

01.02.2019    25855    9    0    

7

Заполнение по ИНН или наименованию реквизитов контрагента по данным сайта ФНС

Обмен с ГосИС WEB-интеграция Платформа 1С v8.3 Управляемые формы 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия государственного учреждения 1С:Документооборот 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Платные (руб)

Обработка является альтернативой механизму, разработанному фирмой 1С и заполняющему реквизиты контрагента по ИНН или наименованию. Не требуется действующей подписки ИТС. Вызывается как внешняя дополнительная обработка, т.е. используется, непосредственно, из карточки контрагента. Заполнение по ИНН или наименованию реквизитов контрагента по данным сайта ФНС (egrul.nalog.ru) для БП 2.0, БП 3.0, БГУ 1.0, БГУ 2.0, УТ 10.3, УТ 11.x, КА 1.1, КА 2.x, УПП 1.x, ERP 2.x, УНФ 1.5, УНФ 1.6, УНФ 3.0, ДО 2.1

2400 руб.

28.04.2016    88877    162    216    

318

Интеграция с сервисом vetmanager

WEB-интеграция Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Бытовые услуги, сервис Платные (руб)

Внешняя обработка разрабатывалась для загрузки документов из Ветменеджер в 1С: Бухгалтерия 3.0

12000 руб.

02.02.2021    16464    42    49    

23

Merlion Commander Версия 1.3.9.2 - июль 2022 г. (Интеграция с 1С: УT, редакция 11.4, 1С:Розница 2.3,1С:ERP Управление предприятием 2, УТ 10.3, редакция веб-сервиса MERLION API 3.0 от 18.08.2021)

Оптовая торговля Розничная торговля WEB-интеграция Платформа 1С v8.3 1С:Управление торговлей 11 Россия Платные (руб)

Расширении конфигурации "Управление торговлей, редакция 11" для работы с веб-сервисом Мерлион с помощью Merlion API. Расширение и набор подключаемых дополнительных обработок позволяет без изменения конфигурации получить возможность работы с API крупнейшего российского дистрибьютора http://merlion.com. Логика работы максимально приближена к работе веб-сервиса b2b. Вы сможете создать и исправить заказ, зарезервировать товар прямо из 1С, посмотреть актуальные остатки и цены, импортировать штрихкода EAN13 товаров, загружать заказ c автоматическим созданием номенклатуры в 1С и корректности создания. Можно выбирать характеристики по товарным группам и загружать товар с выбранными характеристиками, загружать изображения товара. Не требуется установки дополнительного ПО для работы с веб-сервисом. Кроссплатформенное решение для ОС Windows и Linux. Весь код модулей открыт и доступен для просмотра и внесения изменений.

8280 руб.

02.05.2017    40955    43    64    

50
Комментарии
Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. webester 26 12.09.17 06:31 Сейчас в теме
Ни одного комментария, ни в самом коде, не после. Ну да мы же программисты можем сами открыть СП и разобраться, что ты написал и почему. Но как бы смысл тогда в статье, если все равно надо лезть в СП?
maxopik2; Bassgood; +2 Ответить
3. vaniiok 32 12.09.17 11:16 Сейчас в теме
(1)Извините, исправил
Enziger; Alligator48; webester; +3 Ответить
2. kirillkr 29 12.09.17 08:40 Сейчас в теме
Зачем сохранять ответ от сервера в файле? Не надо захламлять сервер временными файлами. У него и без Вас полно мусора от самой системы.
simuljakr; +1 Ответить
4. vaniiok 32 12.09.17 11:17 Сейчас в теме
(2)это пример, можно и без этого
5. Идальго 227 12.09.17 21:32 Сейчас в теме
(2) Как вариант, результат сохраняют в файл для того, чтобы затем его последовательно прочитать (чтоб память пожалеть) или переслать/сохранить. Первый случай особенно полезен, если ответ мегадлинный(большой), или вообще состоит из нескольких частей, которые затем можно "склеить".
6. kirillkr 29 12.09.17 23:56 Сейчас в теме
(5) А есть системы с маленьким жестким диском для сервера приложений, но большим объемом памяти.
А в данном примере не показано удаление этого файла после обработки результата.
7. kaps22 19 18.03.19 11:27 Сейчас в теме
//создаем запрос данных методом POST
запросPOST = Новый HTTPЗапрос("POST");

хорошо бы пометить, что здесь вместо "POST" должен быть адрес ресурса.

Новый HTTPЗапрос(АдресРесурса,Заголовки)
гвость; savauu; AskezaMax; vaniiok; +4 Ответить
8. Teut_Vlad 182 12.07.19 12:22 Сейчас в теме
СтрокаJS = ЗаписьJSON.Закрыть();

если поставить точку останова тут, то ЗаписьJSON.Закрыть() будет строкой, а СтрокаJS Неопределенно
И если дальше шагнуть, то то и то станет Неопределенно
1С:Предприятие 8.3 (8.3.13.1513)
9. xabigv 16.10.19 07:21 Сейчас в теме
(8)
СтрокаJS = ЗаписьJSON.Закрыть();

попробуй убрать строку
ЗаписьJSON.ОткрытьФайл
если имеется
10. ksnik 579 05.07.20 18:09 Сейчас в теме
Отправка данных на сайт Drupal9 post - запросом в формате JSON

Вариация на тему -вот так я добавил пост на сайт Drupal9 (https://www.drupal.org) из 1с8:
HTTPСоединение = Новый HTTPСоединение("localhost",,"НовиковАВ","123123");
    //создаем запрос данных методом POST
    запросPOST = Новый HTTPЗапрос("/jsonapi/node/article"); 
    запросPOST.Заголовки.Вставить("Accept","application/vnd.api+json");
    запросPOST.Заголовки.Вставить("Content-type","application/vnd.api+json");
    запросPOST.Заголовки.Вставить("X-CSRF-Token","Hwz_Hvp4gg2xn9tqo5KVdjOfNPYJFrdZokHe0grop5Q");
    СтрокаJS =     
    "{
    |  ""data"": {
    |    ""type"": ""node--article"",
    |    ""attributes"": {
    |      ""title"": ""My custom title"",
    |      ""body"": {
    |        ""value"": ""Custom value"",
    |        ""format"": ""plain_text""
    |      }
    |    }
    |  }
    |}";
    Сообщить(СтрокаJS);
    запросPOST.УстановитьТелоИзСтроки(СтрокаJS,"windows-1251",ИспользованиеByteOrderMark.НеИспользовать);
    Попытка
        HTTPСоединение.ОтправитьДляОбработки(запросPOST, ФайлОтвета);
    Исключение
        #Если клиент Тогда
           Сообщить(ОписаниеОшибки());
        #КонецЕсли   
    КонецПопытки;
Показать
user875116; user591389_aska_rabota; manlak; horsgroup; user603384_natikjjj; user1201748; MikStyle; AskezaMax; +8 Ответить
11. MikStyle 276 23.06.21 09:35 Сейчас в теме
(10) Спасибо добрый человек. Очень помог твой комментарий. Реально все заработало.
14. user875116 27.02.24 22:08 Сейчас в теме
(10) Уважаемый коллега, доброго вам времени суток.
Я попробовал ваш пример и у меня возник вопрос.
Если вас не затруднит, проясните мне пожалуйста ситуацию.
У меня вот такая ошибка:
запросPOST.УстановитьТелоИзСтроки(СтрокаJS,"windows-1251",ИспользованиеByteOrderMark.НеИспользовать) {<Неизвестный модуль>(1)}: Обращение к процедуре объекта как к функции (УстановитьТелоИзСтроки)
Прикрепленные файлы:
12. Cat-Ek 25.05.22 14:02 Сейчас в теме
ЗаписатьJSON(ЗаписьJSON, СтруктураДанныхJSON);
по причине: Передано значение недопустимого типа
zigrein63; +1 Ответить
13. zigrein63 31.03.23 09:39 Сейчас в теме
(12) (Ответ для тех, кто будет искать)

<Значение> (обязательный)
Тип: Произвольный.
Объект записи JSON. Меняет состояние потока записи.
Представляет собой значение произвольного типа.
В формате JSON допускается записывать только значения следующих типов:
Строка,
Число,
Булево,
Дата (преобразованная в строку),
Массив,
ФиксированныйМассив,
Структура,
ФиксированнаяСтруктура,
Соответствие,
ФиксированноеСоответствие.
Ключ соответствия (или фиксированного соответствия) должен иметь тип Строка. В противном случае, будет вызвано исключение.
Если будет передано значение, отличное от перечисленных, оно должно быть преобразвоано с помощью функции преобразования.
При попытке записать значение недопустимого типа будет вызвано исключение.


Посмотри какие у тебя типы данных в структуре
Оставьте свое сообщение