IE操作するプログラムでエラー処理は？

質問

VBSでIEを操作するプログラムを作っていますがエラー対応をどうすればよいか悩んでいます。
仕様として：
・エラー時にすごく目立つように表示したい
・指定ページが表示されない場合
・ログインが連続4回失敗したらエラー表示したい
・ログインできても５０３や５０５エラーが出たらエラー表示したい

Dim objIE
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Document.fm1.Action="http://abc.xyxyxy-xyxyxy.zzz/"
objIE.Document.fm1.Method="POST"
objIE.Document.fm1.Click

回答No.2

korin_ · ベストアンサー

こんにちは。

ページが表示されたかどうかを判断するには、エラーページが表示されるまで待機して、表示された後のテキストを取得して404エラーかどうか判断するしかないように思います。

Do Until objIE.Busy = False
WScript.sleep(250)
Loop

dim strBody
strBody = objIE.Document.body.innerText ' ←表示されたテキストを取得

回答No.3

nda23

回答ではなく参考意見です。

IEが起動してからはIE側の処理になります。つまり、HTML内の
Scriptに記述しなければなりません。つまり、起動Script側では
処理できません。
リクエストヘッダ等の取得はXMLHttpRequestを参照することで取得
できます。但し、実画面と、サーバの間を別途、仲介しなければ
ならないので、プログラムは難しいものとなるでしょう。

http://msdn.microsoft.com/ja-jp/library/ms535874(en-us,VS.85).aspx#

回答No.1

yyr446

IE Object クラスのプロパティやメソッドがほとんど公開されていないので
（もしかして、知らないのは私だけ？）
ご希望の要件を、作りこむのは難しいと思います。