HTTPステータスコードを取得(VBScript)

質問

VBScriptで、ある任意のWeb画面に対してリクエストを行い、
HTTPステータスコード(200 ok 等)を取得する方法はありますでしょうか。
現在Web画面が正常に表示されているかどうかを確認する為の監視ツールを考えています。
どなたかお分かりになる方がいらっしゃいましたらご教授下さい。

回答No.2

notnot · ベストアンサー

VBで使えるCOMはVBSでも使えます。VBSに書き直して、ばさばさっと削ってみました。

Set oHttp = CreateObject("MSXML2.XMLHTTP")
oHttp.Open "GET", "http://www.google.co.jp/" , False
oHttp.Send
WScript.Echo oHttp.Status

お礼

有難う御座いました。
大変助かりました。

回答No.1

osamuy

「vbscript xmlhttprequest status」で検索して見つかったもの。

参考URL：

http://www.kanaya440.com/contents/tips/vbs/007.html

補足

返答有難う御座います。
参考のURLを確認してみましたが、これはVBではありませんでしょうか？