Отправка сообщений в Telegram при помощи VBS

VBS способен на всё! Ну или почти на все. Предлагаю вашему вниманию метод отправки сообщения в меседжер Telegram. Вам потребуется ID получателя и активное VPN подключение (из России не взлетит). ID получателя можно узнать при помощи специального бота, который сообщает ID ваш или группы. Так же придется зарегистрировать бота у @BotFather

Пример кода с комментариями:

sAPI_ID = "200128073:AAH962nxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"' Токен бота
sChat_ID ="-10010927xxxxx0" ' ИД чата 
sMSG = "Всем привет! Это бот с сайта skywalkeradmin.ru"' Текст сообщения

sUrl = "https://api.telegram.org/bot" & sAPI_ID & "/sendMessage" 'формирование сроки запроса

sRequest = "text=" & sMSG & "&chat_id=" & sChat_ID

HTTPPost sUrl, sRequest 'обращаемся к серверу

Function HTTPPost(sUrl, sRequest) ' вызов функции отправки
  set oHTTP = CreateObject("Microsoft.XMLHTTP")
  oHTTP.open "POST", sUrl,false
  oHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
  oHTTP.setRequestHeader "Content-Length", Len(sRequest)
  oHTTP.send sRequest
  HTTPPost = oHTTP.responseText
 End Function