35
Рейтинг

Всем привет. Большинство наверняка знает про блокировку всеми любимого мессенджера. А ведь у многих на нем написаны боты. Наверняка многие уже нашли простой выход из проблемы, эта публикация для тех, кто еще не нашел, или не хочет на это тратить время. Вот самый простой способ восстановления функций бота, для примера я взял отправку текстовых сообщений:

Код
Процедура ОтправитьСообщениеТелеграмм(ТекстСообщения,Прокси, Порт, ИмяБота,Чат, Ресурс) Экспорт ssl = Новый ЗащищенноеСоединениеOpenSSL(); Прокси = Новый ИнтернетПрокси; Прокси.Установить("https",Прокси,Порт); HTTPСоединение = Новый HTTPСоединение(Ресурс,,,,Прокси,,ssl); //HTTPСоединение.Прокси = Прокси; HTTPЗапрос = Новый HTTPЗапрос("/" + ИмяБота + "/sendMessage?chat_id=" + Чат + "&text=" + ТекстСообщения); Попытка Ответ = HTTPСоединение.Получить(HTTPЗапрос); Исключение // исключение здесь говорит о том, что запрос не дошел до HTTP-Сервера Сообщить("Произошла сетевая ошибка!"); ВызватьИсключение; КонецПопытки; КонецПроцедуры

Код

Процедура ОтправитьСообщениеТелеграмм(ТекстСообщения,Прокси, Порт, ИмяБота,Чат, Ресурс) Экспорт 
    
    ssl = Новый ЗащищенноеСоединениеOpenSSL(); 
    Прокси = Новый ИнтернетПрокси;
    Прокси.Установить("https",Прокси,Порт);
    HTTPСоединение = Новый HTTPСоединение(Ресурс,,,,Прокси,,ssl);
    //HTTPСоединение.Прокси = Прокси;
    HTTPЗапрос = Новый HTTPЗапрос("/" + ИмяБота + "/sendMessage?chat_id=" + Чат + "&text=" + ТекстСообщения);
    Попытка
        Ответ =  HTTPСоединение.Получить(HTTPЗапрос);
    Исключение
        // исключение здесь говорит о том, что запрос не дошел до HTTP-Сервера
        Сообщить("Произошла сетевая ошибка!");
        ВызватьИсключение;
    КонецПопытки;                  

КонецПроцедуры

где ТекстСообщения - текст отправляемого сообщения

Прокси - ip адрес https прокси

Порт - порт https прокси

ИмяБота - id бота

Чат - id чата

Dev › Получение таблицы из Web-сервиса SAP в 1с › #0 23.07.14 12:31

Решение проблемы с получением данных сложного типа в 1с из SAP

БУ › Простой перенос данных из "Управление торговлей" 10.3 в "Бухгалтерию предприятия" 2.0 › #32 14.08.12 19:51

(31) выражаю благодарность! Перенос работает отлично, пропала головная боль с измененными документами в УТ. Спасибо

БУ › Простой перенос данных из "Управление торговлей" 10.3 в "Бухгалтерию предприятия" 2.0 › #30 10.08.12 17:09

Razrab1c, скажите пожалуйста каким образом подставляете счета учета в поступлении и реализации?

Dev › Универсальный фильтр для таблицы значений › #8 13.07.12 19:09

(6) Збянтэжаны Саўка,
В конфигурации простой пример как эта Внешняя обработка может быть привязана к ТЗ.

Dev › Универсальный фильтр для таблицы значений › #3 06.07.12 9:52

(1) CaSH_2004, Даже не задумывался о том чтоб сделать похожим на типовой - тут несколько иной принцип фильтрации.

Dev › Универсальный фильтр для таблицы значений › #0 05.07.12 18:19

Универсальный фильтр по любой табличной части с типом Таблица значений. Не зависит от количества колонок.

35 Рейтинг

gvido Гвидо Лесом

Рейтинг 35

Получение таблицы из Web-сервиса SAP в 1с +12 –

Универсальный фильтр для таблицы значений +23 –

Комментарии

35
Рейтинг

gvido
Гвидо Лесом

Получение таблицы из Web-сервиса SAP в 1с
+12 –

Универсальный фильтр для таблицы значений
+23 –