2009/12/03
[Twitter][WSH]Twitterにポストする2
以前、[Twitter][WSH]Twitterにポストするという記事を書いたんですが、もっと簡単にできましたので修正版。
sUser = "userid" 'ユーザーID sPassword = "password" 'パスワード sURL = "http://twitter.com/statuses/update.json" Set oHTTP = WScript.CreateObject("Msxml2.XMLHTTP") Set wshShell=CreateObject("WScript.Shell") oHTTP.Open "POST", sURL, False, sUser, sPassword oHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" oHTTP.setRequestHeader "X-Twitter-Client", "twitterPost.vbs" oHTTP.setRequestHeader "X-Twitter-Client-Version", "1.0" oHTTP.send "status=" & "テストです"
ポイントは、URLエンコードが実は必要なかったというところです。XMLHTTPは呼び出し元の文字コードに関わらず必ず文字列をUTF-8でURLエンコードしてポストするのでした。というわけでこれを使ってください。
元記事:http://blogs.wankuma.com/mutaguchi/archive/2009/12/03/183500.aspxプライバシーポリシー