read first to get chatID and botID from : https://core.telegram.org/bots
' ===== Start Script =====
Dim http,URL
strTxt = "Tes Message"
chatID = "xxxxxxxx"
botID = "botxxxxxxxxxxxxxxx"
URL = "https://api.telegram.org/" & botID & "/sendMessage?chat_id=" & chatID & "&text=" & strTxt
Set http = CreateObject("Msxml2.XMLHTTP")
http.open "GET",URL,False
http.send
No comments:
Post a Comment