sAPI_ID = "200128073:AAH962nxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"' Токен бота
sChat_ID ="-10010927xxxxx0" ' ИД чата
sMSG = "Всем привет! Это бот с сайта it-klaster.com"' Текст сообщения
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