Merhaba dostlar
Bu gün sizlere vbs ile telegram apisi kullanarak bilgisayarımız açıldığında gizlice bildirim almayı sağlayan sistemi kodlayacağız.
İlk olarak bir telegram botu oluşturalım.
Bu botu bot father ile oluşturacağımız için arama kısmına gidelim ve botfather yazıp ilk çıkan hesaba tıklayalım.
Sonrasında /newbot yazarak bot oluşturalım isim isteyecek.
İsime sonuna _bot gelecek şekilde yazıyoruz. Ben denemetht_bot yazdım.
gördüğünüz gibi tokenımızı mesaj olarak botfather bize gönderdi.
Şimdi ise bir grup oluşturuyorum ve ardından botumu gruba ekliyorum.
Sonrasında telegrama web sitesinden girerek grubuma tıklıyorum. Tıkladıktan sonra yukarıda çıkan url'in sonunu kopyalıyorum.
Bu chat id'miz.
Artık telegram botumuza mesaj attırmak için url'imizi hazırlayalım.
https://api.telegram.org/bot
kısmı herkeste aynı olacak. Sonrasına size botfather in verdiği bot tokenini yazıyoruz.
https://api.telegram.org/bot6111027296:AAF0Oirzk-yLK-FaLjp3bXJnCqSx1-1S3GU oldu.
Sonrasında ise sendMessage?chat_id= ekliyoruz ve chat id mizi burada en sona ekliyoruz. Url son hali
https://api.telegram.org/bot6111027...XJnCqSx1-1S3GU/sendMessage?chat_id=-935515348 oldu.
sonrasına ise &text= ekleyerek en sonuna eklemek istediğimiz mesajı yazıyoruz. Ben captainkanka yazıyorum ve url i son haline getiriyorum.
https://api.telegram.org/bot6111027...dMessage?chat_id=-935515348&text=captainkanka
Şimdi bu adrese chromedan gidelim ve ardından telegram grubumuza mesaj düşüyormu kontrol edelim.
Gördüğünüz gibi ekrana düştü bot oluşturma işlemimiz tamam. Artık kodlamaya başlayalım.
ardından vbs dosyamızı kodlamak için bir metin belgesi oluşturup kodlarımızı düzenleyip farklı kaydet diyip .vbs olarak kaydedelim.
siz koddaki telegram bot bilgilerinizi yani bottoken chatid ve message alanlarını kendinize göre düzenleyiniz.
Bu gün sizlere vbs ile telegram apisi kullanarak bilgisayarımız açıldığında gizlice bildirim almayı sağlayan sistemi kodlayacağız.
İlk olarak bir telegram botu oluşturalım.
Bu botu bot father ile oluşturacağımız için arama kısmına gidelim ve botfather yazıp ilk çıkan hesaba tıklayalım.
Sonrasında /newbot yazarak bot oluşturalım isim isteyecek.
İsime sonuna _bot gelecek şekilde yazıyoruz. Ben denemetht_bot yazdım.
gördüğünüz gibi tokenımızı mesaj olarak botfather bize gönderdi.
Şimdi ise bir grup oluşturuyorum ve ardından botumu gruba ekliyorum.
Sonrasında telegrama web sitesinden girerek grubuma tıklıyorum. Tıkladıktan sonra yukarıda çıkan url'in sonunu kopyalıyorum.
Bu chat id'miz.
Artık telegram botumuza mesaj attırmak için url'imizi hazırlayalım.
https://api.telegram.org/bot
kısmı herkeste aynı olacak. Sonrasına size botfather in verdiği bot tokenini yazıyoruz.
https://api.telegram.org/bot6111027296:AAF0Oirzk-yLK-FaLjp3bXJnCqSx1-1S3GU oldu.
Sonrasında ise sendMessage?chat_id= ekliyoruz ve chat id mizi burada en sona ekliyoruz. Url son hali
https://api.telegram.org/bot6111027...XJnCqSx1-1S3GU/sendMessage?chat_id=-935515348 oldu.
sonrasına ise &text= ekleyerek en sonuna eklemek istediğimiz mesajı yazıyoruz. Ben captainkanka yazıyorum ve url i son haline getiriyorum.
https://api.telegram.org/bot6111027...dMessage?chat_id=-935515348&text=captainkanka
Şimdi bu adrese chromedan gidelim ve ardından telegram grubumuza mesaj düşüyormu kontrol edelim.
Gördüğünüz gibi ekrana düştü bot oluşturma işlemimiz tamam. Artık kodlamaya başlayalım.
ardından vbs dosyamızı kodlamak için bir metin belgesi oluşturup kodlarımızı düzenleyip farklı kaydet diyip .vbs olarak kaydedelim.
siz koddaki telegram bot bilgilerinizi yani bottoken chatid ve message alanlarını kendinize göre düzenleyiniz.
Kod:
Dim http[/COLOR][/CENTER][/COLOR][/CENTER]
[COLOR=rgb(251, 160, 38)][CENTER][COLOR=rgb(251, 160, 38)][CENTER]Set http = CreateObject("MSXML2.ServerXMLHTTP.6.0")
' Telegram API'sine mesaj göndermek için URL'yi oluştur
Dim botToken, chatId, message
botToken = "702_Chav1z3A"
chatId = "2059"
message = "Kendi Bilgisayariniz acildi.@CaptainKanka"
' URL'yi oluştur
Dim url
url = "https://api.telegram.org/bot" & botToken & "/sendMessage?chat_id=" & chatId & "&text=" & message
' HTTP isteğini gönder
http.Open "GET", url, False
http.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
http.Sendtest etmek için vbs dosyamızı bir kez çalıştıralım ve telegramımızı kontrol edelim.
ve bu oluşturduğumuz vbs dosyasını bilgisayarın başlangıç klasörüne kaydedelim. bunun için windows+r tuşuna basıp shell:startup yazıp enterlayalım.
Ve gelen klasörün içine bu vbs dosyamızı kopyalayalım.
İşlemler bu kadar.
İyi Forumlar
