06-22-2009, 09:12 PM
this function works for me
Function tweetTest
Function tweetTest
;;/
function $text [$username] [$password]
text="viva la qm 2"
username="username"
password="password"
str user.encrypt(4 _s.from(username ":" password) "" 3)
_s.from("Authorization: Basic " user)
str header.format("%s[]X-Twitter-Client: QuickMacros" _s)
str status.from("status=" text)
Http h.Connect("twitter.com")
h.Post("statuses/update.xml" status 0 header)
out header