VBS IE操作 表示されているIEをURLを条件に探す

ソースコードと全体の流れは http://d.hatena.ne.jp/ken3memo/20110828 を見てください

VBS(WSH)から表示されているIEをURLを条件に探してみたいと思います。

CreateObject Shell.Application で シェルのオブジェクトを作成して、
For Each objWindow In objShell.Windows で 1つ1つ取り出して、
TypeName(objWindow.document) で ドキュメントのタイプを表示させてみました。

TypeName(objWindow.document) が HTMLDocument だったら、
MsgBox objWindow.document.Title & vbCrLf & objWindow.document.URL
で、タイトルとURLを確認してみました。

あとは、.URLの値を比べ
Set objIE = objWindow で見つけたオブジェクトをセットしただけでした。


三流君 IE操作 VBS JRA IPAT テスト 試行錯誤 CreateObject Shell.Application document.URL