Başlangıç > Kodlar > ASP ile Twitter’da otomatik mesaj atmak

ASP ile Twitter’da otomatik mesaj atmak

canafar k.a ve , canafar sifre yi kendinize göre ayarlayın "canafar" yerine de mesajı yazıp gönderin

function canafar(msg,user,pass)
dim xml,url
url = "http://twitter.com/statuses/update.xml"
set xml = Server.CreateObject("MSXML2.ServerXMLHTTP.3.0")
xml.Open "POST", url, false, user, pass
xml.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xml.Send "status=" & server.URLencode(msg)
canafar = xml.responseText
Set xml = nothing
end Function

durum = canafar("canafar","canafar k.a","canafar sifre")
response.write("İşlem tamamlandı.")

 

Reklamlar
Kategoriler:Kodlar Etiketler:, , , , , , ,
  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: