Отправка данных на сайт 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

См. также

Интеграция Альфа Авто 5 / Альфа Авто 6 и AUTOCRM / Инфотек

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

Интеграционный модуль обмена между конфигурацией Альфа Авто 5 и Альфа Авто 6 и порталом AUTOCRM. Данный модуль универсален. Позволяет работать с несколькими обменами AUTOCRM разных брендов в одной информационной базе в ручном и автоматическом режиме.

36000 руб.

03.08.2020    15910    14    18    

12

Интеграция 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    17843    6    15    

13

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

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

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

8400 руб.

01.02.2019    25852    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    88876    162    216    

318

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

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

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

12000 руб.

02.02.2021    16464    42    49    

23
Комментарии
Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
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 допускается записывать только значения следующих типов:
Строка,
Число,
Булево,
Дата (преобразованная в строку),
Массив,
ФиксированныйМассив,
Структура,
ФиксированнаяСтруктура,
Соответствие,
ФиксированноеСоответствие.
Ключ соответствия (или фиксированного соответствия) должен иметь тип Строка. В противном случае, будет вызвано исключение.
Если будет передано значение, отличное от перечисленных, оно должно быть преобразвоано с помощью функции преобразования.
При попытке записать значение недопустимого типа будет вызвано исключение.


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