JohnyDeath · September 27, 2019 09:48 · Aug 28, 2019 · Aug 28, 2019 · Aug 27, 2019 · Aug 27, 2019
diff --git a/telegram.bsl b/telegram.bsl
@@ -1,3 +1,27 @@
+/// ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+/// The MIT License
+/// 
+/// Copyright (c) 2019 Plague Fox
+/// 
+/// Permission is hereby granted, free of charge, to any person obtaining a copy
+/// of this software and associated documentation files (the "Software"), to deal
+/// in the Software without restriction, including without limitation the rights
+/// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+/// copies of the Software, and to permit persons to whom the Software is
+/// furnished to do so, subject to the following conditions:
+/// 
+/// The above copyright notice and this permission notice shall be included in
+/// all copies or substantial portions of the Software.
+/// 
+/// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+/// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+/// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+/// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+/// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+/// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+/// THE SOFTWARE.
+/// ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+
 Перем Токен,ИдентификаторПолучателя; // Телеграм
 Перем ПроксиПротокол,ПроксиСервер,ПроксиПорт,ПроксиПользователь,ПроксиПароль; // Прокси
 

diff --git a/telegram.bsl b/telegram.bsl
@@ -1,3 +1,6 @@
+Перем Токен,ИдентификаторПолучателя; // Телеграм
+Перем ПроксиПротокол,ПроксиСервер,ПроксиПорт,ПроксиПользователь,ПроксиПароль; // Прокси
+
 Процедура ОтправитьСообщениеВТелеграм(Сообщение)
     // Глобальные переменные в процедуре:
     // + Токен
@@ -127,4 +130,17 @@
     SSL         = Новый ЗащищенноеСоединениеOpenSSL();
     Соединение  = Новый HTTPСоединение("api.telegram.org", 443,,, Прокси, 30, SSL, Ложь); 
     Возврат Соединение;
-КонецФункции // ПолучитьСоединение()
+КонецФункции // ПолучитьСоединение()
+
+// ТЕЛЕГРАМ +
+Токен                   = ""; // 000000000:XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
+ИдентификаторПолучателя = ""; // -000000000
+// ТЕЛЕГРАМ -
+
+// ПРОКСИ +
+ПроксиПротокол          = "https"; // для socks5 - https
+ПроксиСервер            = "socks5://0.0.0.0"; // socks5://domain.tld
+ПроксиПорт              = 1080; // 1080
+ПроксиПользователь      = ""; // user
+ПроксиПароль            = ""; // password              
+// ПРОКСИ -
diff --git a/telegram.bsl b/telegram.bsl
@@ -49,7 +49,7 @@
     ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
     ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""disable_notification""");
     ЗаписьДанных.ЗаписатьСтроку("");
-    ЗаписьДанных.ЗаписатьСтроку("true");
+    ЗаписьДанных.ЗаписатьСтроку("True");
 
     Если Не ПустаяСтрока(Сообщение) Тогда 
         // caption

diff --git a/telegram.bsl b/telegram.bsl
@@ -87,10 +87,8 @@
     Соединение  = ПолучитьСоединение();
     Заголовки   = Новый Соответствие;
     Заголовки.Вставить("Content-Type",      "multipart/form-data; boundary=" + Разделитель);
-    Заголовки.Вставить("content-type",      "multipart/form-data; boundary=" + Разделитель);
     Заголовки.Вставить("Accept",            "*/*");
     Заголовки.Вставить("Cache-Control",     "no-cache");
-    Заголовки.Вставить("cache-control",     "no-cache");
     Заголовки.Вставить("Host",              "api.telegram.org");
     Заголовки.Вставить("Accept-Encoding",   "gzip, deflate");
     Заголовки.Вставить("Content-Length",    Формат(ДанныеТела.Размер(), "ЧДЦ=0; ЧН=0; ЧГ=0"));

diff --git a/telegram.bsl b/telegram.bsl
@@ -51,8 +51,8 @@
     ЗаписьДанных.ЗаписатьСтроку("");
     ЗаписьДанных.ЗаписатьСтроку("true");
 
-    // caption
-    Если Не ПустаяСтрока(Сообщение) Тогда    
+    Если Не ПустаяСтрока(Сообщение) Тогда 
+        // caption
         ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
         ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""caption""");
         ЗаписьДанных.ЗаписатьСтроку("");

diff --git a/telegram.bsl b/telegram.bsl
@@ -50,19 +50,19 @@
     ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""disable_notification""");
     ЗаписьДанных.ЗаписатьСтроку("");
     ЗаписьДанных.ЗаписатьСтроку("true");
-
-    // parse_mode
-    ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
-    ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""parse_mode""");
-    ЗаписьДанных.ЗаписатьСтроку("");
-    ЗаписьДанных.ЗаписатьСтроку("HTML");
-
+
     // caption
     Если Не ПустаяСтрока(Сообщение) Тогда    
         ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
         ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""caption""");
         ЗаписьДанных.ЗаписатьСтроку("");
-        ЗаписьДанных.ЗаписатьСтроку(Сообщение);
+        ЗаписьДанных.ЗаписатьСтроку(Сообщение);        
+
+        // parse_mode
+        ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
+        ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""parse_mode""");
+        ЗаписьДанных.ЗаписатьСтроку("");
+        ЗаписьДанных.ЗаписатьСтроку("HTML");
     КонецЕсли;
 
     // document    

diff --git a/telegram.bsl b/telegram.bsl
@@ -33,7 +33,7 @@
     // + ИдентификаторПолучателя
 
     // Сформировать тело запроса
-    Разделитель     = "----" + Строка(Новый УникальныйИдентификатор());
+    Разделитель     = Строка(Новый УникальныйИдентификатор());
 
     // Формируем основное составное сообщение
     Тело            = Новый ПотокВПамяти();

diff --git a/telegram.bsl b/telegram.bsl
@@ -16,14 +16,15 @@
     Ответ       = Соединение.Получить(Запрос);
 
     // Разбор ответа
-    Если Ответ.КодСостояния <> 200 Тогда 
-        ВызватьИсключение СтрШаблон("Ошибка отправки сообщения в телеграм.
+    Если Ответ.КодСостояния <> 200 Тогда
+        ОтветСтрокой    = Ответ.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8);
+        ВызватьИсключение СтрШаблон("Ошибка отправки вложения в телеграм.
             |Код состояния: %1
             |Тело: %2"
             , Ответ.КодСостояния
-            , Ответ.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8)
+            , ОтветСтрокой
         ); 
-    КонецЕсли;   
+    КонецЕсли;  
 КонецПроцедуры // ОтправитьСообщениеВТелеграм()
 //************************************************************
 Процедура ОтправитьТабличныйДокументВТелеграм(ТабличныйДокумент, ИмяФайла = "", Сообщение = "")

diff --git a/.bsl → telegram.bsl b/.bsl → telegram.bsl
@@ -1,4 +1,3 @@
-// Телеграм
 Процедура ОтправитьСообщениеВТелеграм(Сообщение)
     // Глобальные переменные в процедуре:
     // + Токен

diff --git a/.bsl b/.bsl
@@ -1,3 +1,32 @@
+// Телеграм
+Процедура ОтправитьСообщениеВТелеграм(Сообщение)
+    // Глобальные переменные в процедуре:
+    // + Токен
+    // + ИдентификаторПолучателя
+
+    // Сформировать соединение и запрос
+    Соединение  = ПолучитьСоединение();
+    Адрес       = СтрШаблон("/bot%1/sendMessage?chat_id=%2&parse_mode=HTML&text=%3"
+                , Токен
+                , ИдентификаторПолучателя
+                , КодироватьСтроку(Сообщение, СпособКодированияСтроки.КодировкаURL, "UTF8"));
+    Заголовки   = Новый Соответствие;
+    Запрос      = Новый HTTPЗапрос(Адрес, Заголовки);
+
+    // GET
+    Ответ       = Соединение.Получить(Запрос);
+
+    // Разбор ответа
+    Если Ответ.КодСостояния <> 200 Тогда 
+        ВызватьИсключение СтрШаблон("Ошибка отправки сообщения в телеграм.
+            |Код состояния: %1
+            |Тело: %2"
+            , Ответ.КодСостояния
+            , Ответ.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8)
+        ); 
+    КонецЕсли;   
+КонецПроцедуры // ОтправитьСообщениеВТелеграм()
+//************************************************************
 Процедура ОтправитьТабличныйДокументВТелеграм(ТабличныйДокумент, ИмяФайла = "", Сообщение = "")
     // Глобальные переменные в процедуре:
     // + Токен

diff --git a/.bsl b/.bsl
@@ -38,7 +38,7 @@
 
     // document    
     ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
-    ЗаписьДанных.ЗаписатьСтроку(СтрШаблон("Content-Disposition: form-data; name=""document""; filename=""%1.pdf""", ?(ПустаяСтрока(ИмяФайла), "document", ИмяФайла)));
+    ЗаписьДанных.ЗаписатьСтроку(СтрШаблон("Content-Disposition: form-data; name=""document""; filename=""%1.pdf""", ?(ПустаяСтрока(ИмяФайла), "document_" + Строка(Новый УникальныйИдентификатор()), ИмяФайла)));
     ЗаписьДанных.ЗаписатьСтроку("Content-Type: application/pdf");
     ЗаписьДанных.ЗаписатьСтроку("");   
     ЗаписьДанных.Закрыть();    

diff --git a/.bsl b/.bsl
@@ -38,7 +38,7 @@
 
     // document    
     ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
-    ЗаписьДанных.ЗаписатьСтроку(СтрШаблон("Content-Disposition: form-data; name=""document""; filename=""%1.pdf""", ИмяФайла));
+    ЗаписьДанных.ЗаписатьСтроку(СтрШаблон("Content-Disposition: form-data; name=""document""; filename=""%1.pdf""", ?(ПустаяСтрока(ИмяФайла), "document", ИмяФайла)));
     ЗаписьДанных.ЗаписатьСтроку("Content-Type: application/pdf");
     ЗаписьДанных.ЗаписатьСтроку("");   
     ЗаписьДанных.Закрыть();    

diff --git a/.bsl b/.bsl
@@ -57,21 +57,21 @@
     // Сформировать соединение и запрос
     Соединение  = ПолучитьСоединение();
     Заголовки   = Новый Соответствие;
-    Заголовки.Вставить("Content-Type", "multipart/form-data; boundary=" + Разделитель);
-    Заголовки.Вставить("content-type", "multipart/form-data; boundary=" + Разделитель);
-    Заголовки.Вставить("Accept", "*/*");
-    Заголовки.Вставить("Cache-Control", "no-cache");
-    Заголовки.Вставить("cache-control", "no-cache");
-    Заголовки.Вставить("Host", "api.telegram.org");
-    Заголовки.Вставить("Accept-Encoding", "gzip, deflate");
-    Заголовки.Вставить("Content-Length", Формат(ДанныеТела.Размер(), "ЧДЦ=0; ЧН=0; ЧГ=0"));
-    Заголовки.Вставить("Connection", "close");
+    Заголовки.Вставить("Content-Type",      "multipart/form-data; boundary=" + Разделитель);
+    Заголовки.Вставить("content-type",      "multipart/form-data; boundary=" + Разделитель);
+    Заголовки.Вставить("Accept",            "*/*");
+    Заголовки.Вставить("Cache-Control",     "no-cache");
+    Заголовки.Вставить("cache-control",     "no-cache");
+    Заголовки.Вставить("Host",              "api.telegram.org");
+    Заголовки.Вставить("Accept-Encoding",   "gzip, deflate");
+    Заголовки.Вставить("Content-Length",    Формат(ДанныеТела.Размер(), "ЧДЦ=0; ЧН=0; ЧГ=0"));
+    Заголовки.Вставить("Connection",        "close");
     Адрес       = СтрШаблон("/bot%1/sendDocument", Токен);
     Запрос      = Новый HTTPЗапрос(Адрес, Заголовки);
     Запрос.УстановитьТелоИзДвоичныхДанных(ДанныеТела);
 
     // POST
-    Ответ               = Соединение.ОтправитьДляОбработки(Запрос);
+    Ответ       = Соединение.ОтправитьДляОбработки(Запрос);
 
     // Разбор ответа
     Если Ответ.КодСостояния <> 200 Тогда

diff --git a/.bsl b/.bsl
@@ -0,0 +1,103 @@
+Процедура ОтправитьТабличныйДокументВТелеграм(ТабличныйДокумент, ИмяФайла = "", Сообщение = "")
+    // Глобальные переменные в процедуре:
+    // + Токен
+    // + ИдентификаторПолучателя
+
+    // Сформировать тело запроса
+    Разделитель     = "----" + Строка(Новый УникальныйИдентификатор());
+
+    // Формируем основное составное сообщение
+    Тело            = Новый ПотокВПамяти();
+    ЗаписьДанных    = Новый ЗаписьДанных(Тело, КодировкаТекста.UTF8, ПорядокБайтов.LittleEndian, Символы.ВК + Символы.ПС, Символы.ПС, Истина);
+
+    // chat_id
+    ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
+    ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""chat_id""");
+    ЗаписьДанных.ЗаписатьСтроку("");
+    ЗаписьДанных.ЗаписатьСтроку(ИдентификаторПолучателя);
+
+    // disable_notification
+    ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
+    ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""disable_notification""");
+    ЗаписьДанных.ЗаписатьСтроку("");
+    ЗаписьДанных.ЗаписатьСтроку("true");
+
+    // parse_mode
+    ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
+    ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""parse_mode""");
+    ЗаписьДанных.ЗаписатьСтроку("");
+    ЗаписьДанных.ЗаписатьСтроку("HTML");
+
+    // caption
+    Если Не ПустаяСтрока(Сообщение) Тогда    
+        ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
+        ЗаписьДанных.ЗаписатьСтроку("Content-Disposition: form-data; name=""caption""");
+        ЗаписьДанных.ЗаписатьСтроку("");
+        ЗаписьДанных.ЗаписатьСтроку(Сообщение);
+    КонецЕсли;
+
+    // document    
+    ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель);
+    ЗаписьДанных.ЗаписатьСтроку(СтрШаблон("Content-Disposition: form-data; name=""document""; filename=""%1.pdf""", ИмяФайла));
+    ЗаписьДанных.ЗаписатьСтроку("Content-Type: application/pdf");
+    ЗаписьДанных.ЗаписатьСтроку("");   
+    ЗаписьДанных.Закрыть();    
+
+    // Добавим файл
+    ТабличныйДокумент.Записать(Тело, ТипФайлаТабличногоДокумента.PDF);
+
+    // Завершение записи
+    ЗаписьДанных    = Новый ЗаписьДанных(Тело, КодировкаТекста.UTF8, ПорядокБайтов.LittleEndian, Символы.ВК + Символы.ПС, Символы.ПС, Ложь);
+    ЗаписьДанных.ЗаписатьСтроку("");
+    ЗаписьДанных.ЗаписатьСтроку("--" + Разделитель + "--");
+    ЗаписьДанных.Закрыть();
+
+    ДанныеТела          = Тело.ЗакрытьИПолучитьДвоичныеДанные();   
+
+    // Сформировать соединение и запрос
+    Соединение  = ПолучитьСоединение();
+    Заголовки   = Новый Соответствие;
+    Заголовки.Вставить("Content-Type", "multipart/form-data; boundary=" + Разделитель);
+    Заголовки.Вставить("content-type", "multipart/form-data; boundary=" + Разделитель);
+    Заголовки.Вставить("Accept", "*/*");
+    Заголовки.Вставить("Cache-Control", "no-cache");
+    Заголовки.Вставить("cache-control", "no-cache");
+    Заголовки.Вставить("Host", "api.telegram.org");
+    Заголовки.Вставить("Accept-Encoding", "gzip, deflate");
+    Заголовки.Вставить("Content-Length", Формат(ДанныеТела.Размер(), "ЧДЦ=0; ЧН=0; ЧГ=0"));
+    Заголовки.Вставить("Connection", "close");
+    Адрес       = СтрШаблон("/bot%1/sendDocument", Токен);
+    Запрос      = Новый HTTPЗапрос(Адрес, Заголовки);
+    Запрос.УстановитьТелоИзДвоичныхДанных(ДанныеТела);
+
+    // POST
+    Ответ               = Соединение.ОтправитьДляОбработки(Запрос);
+
+    // Разбор ответа
+    Если Ответ.КодСостояния <> 200 Тогда
+        ОтветСтрокой    = Ответ.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8);
+        ВызватьИсключение СтрШаблон("Ошибка отправки вложения в телеграм.
+            |Код состояния: %1
+            |Тело: %2"
+            , Ответ.КодСостояния
+            , ОтветСтрокой
+        ); 
+    КонецЕсли;
+КонецПроцедуры // ОтправитьТабличныйДокументВТелеграм()
+//************************************************************
+Функция ПолучитьСоединение()    
+    // Глобальные переменные в процедуре:
+    // + ПроксиПротокол
+    // + ПроксиСервер
+    // + ПроксиПорт
+    // + ПроксиПользователь
+    // + ПроксиПароль
+
+    Прокси      = Новый ИнтернетПрокси(Истина);
+    Если ТипЗнч(ПроксиПротокол) = Тип("Строка") И Не ПустаяСтрока(ПроксиПротокол) Тогда
+        Прокси.Установить(ПроксиПротокол, ПроксиСервер, ПроксиПорт, ПроксиПользователь, ПроксиПароль, Ложь);
+    КонецЕсли;
+    SSL         = Новый ЗащищенноеСоединениеOpenSSL();
+    Соединение  = Новый HTTPСоединение("api.telegram.org", 443,,, Прокси, 30, SSL, Ложь); 
+    Возврат Соединение;
+КонецФункции // ПолучитьСоединение()