что интересно
Если я делаю это с консоли , с помощью
Код |
---|
BX24.callMethod ( 'log.blogpost.add',
{POST_MESSAGE: '1 Hello, world!\n\r 2 вторая строка\n\r 3 третья строка '},
function { if(!r.error()) { alert('OK!'); } else { throw r.error(); }}
);
|
вот так все чудесно работает
а если веб хуком - то не работает
Код |
---|
Строка1="1-строка\n\r 2-строка\n\r3-строка";
sCommand = "log.blogpost.add?POST_TITLE=Внимание УТ->БП разница&POST_MESSAGE="+Строка1+"&DEST[]=DR64&DEST[]=U237&DEST[]=U60";
tДанные = yz_ЗаписатьПорциюДанныхВБитрикс24.yz_ЗаписатьПорциюДанныхВБитрикс24(sCommand);
вариант
Строка1="1-строка"+СИМВОЛЫ.ПС+СИМВОЛЫ.ВК+"2-строка"+СИМВОЛЫ.ПС+СИМВОЛЫ.ВК+"3-строка";
тоже не проходит
|
Код |
---|
&НаСервере
Процедура yz_ЗадержкаЧтенияИзИнтернета(Секунды)
ВремяОкончания = ТекущаяДата() + Секунды;
Пока ТекущаяДата() <= ВремяОкончания Цикл
КонецЦикла;
КонецПроцедуры
&НаСервере
Функция yz_ЗаписатьПорциюДанныхВБитрикс24( Команда ) Экспорт// yz_Юрий Зайцев 2018.07.16
WinHttp = 0;
Если Константы.yz_Б24АдресСайта.Получить() <> "" Тогда
Для СчетчикПопыток = 1 ПО 3 Цикл
StrHTTP = СокрЛП(Константы.yz_Б24АдресСайта.Получить())+"/rest/"+СокрЛП(Строка(Константы.yz_Б24IDuser.Получить()))+"/"+СокрЛП(Константы.yz_Б24ВебХук.Получить())+"/"+Команда+"";
WinHttp = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
WinHttp.Option(2,"Windows-1251");
WinHttp.Open("GET", StrHTTP, 0 );
WinHttp.SetRequestHeader("Accept-Language", "ru");
WinHttp.SetRequestHeader("Accept-Charset","Windows-1251");
WinHttp.setRequestHeader("Content-Language", "ru");
WinHttp.setRequestHeader("Content-Charset", "Windows-1251");
WinHttp.setRequestHeader("Content-type", "application/json; charset=Windows-1251");
Попытка
a=WinHttp.Send();
Исключение
WinHttp = 0;
КонецПопытки;
Если WinHttp <> 0 Тогда
Если WinHttp.Status <> 200 Тогда //KAA ОШИБКА ОБМЕНА 23.09.2019
WinHttp = 0;
Иначе
txtJSON = WinHttp.ResponseText();
тЧтение = Новый ЧтениеJSON;
тЧтение.УстановитьСтроку(txtJSON);
тДанные = ПрочитатьJSON(тЧтение, Ложь); // тут 1С конвертит в формат JSON - и все данные попадают в структуру тДанные
WinHttp = тДанные;
Прервать;
КонецЕсли;
КонецЕсли;
yz_ЗадержкаЧтенияИзИнтернета(СчетчикПопыток); // Пытаемся записать
КонецЦикла;
конецесли;
Возврат WinHttp;
КонецФункции // yz_Юрий Зайцев 2018.07.16
|