Autoupdate din Twitter / post til Twitter (kode)
2
OKT
Autoupdate din Twitter / post til Twitter (kode)
Skrevet af Michael Nilsson d. 2. OKT. 2009
I forbindelse med KbhTweet.dk skulle jeg finde ud af, hvordan man auto opdaterer sit Twitter eksternt. Det er faktisk ganske simpelt, her er koden.
Dim xml
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
twitter_username = "dit-brugernavn"
twitter_password = "dit-password"
new_status = "Indholdet af dit Twitter post.."
xml.Open "POST", "http://" & twitter_username & ":" & twitter_password & "@twitter.com/statuses/update.xml?status=" & server.URLencode(new_status), False
xml.setRequestHeader "Content-Type", "content=text/html; charset=iso-8859-1"
xml.Send
Set xml = Nothing