IEのリンク先を取り込む。 IE.docoment.links
ブラウザIEに表示される内容のうち、リンクに関するものの情報
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("http://uwsc.36nyan.com/exitexit/")
sleep (1)
for i=0 to (IE.document.links.length - 1)
href=IE.document.links[i].href
PRINT "href:" + href
next
sleep(100)
1行目:IEの起動
2行目:IEの表示
3行目:URLの指定
4行目:IE表示までのウェイト1秒(本来はIEの起動をチェックすべきだが簡易的にウェイトで)
5行目:IE.docoment.links.lengthがリンク数を表す。配列なので0~
6行目:リンクの内容をhrefに代入
7行目:href をprint
9行目:printのウィンドウを表示しっぱなしにするためにスリープ


最近のコメント