リンクをVBで自動クリックさせるには (ID:124290)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 魔界の仮面弁士様 いつもありがとうございます 似たようなソースをどこかから持ってきました。 これを実行するとＵＲＬの一覧表示は出来ますが これを自動クリックさせる方法がどうしても分かりません。 ターゲットページの URL 一覧を表示する all コレクションを使用して href 属性を全て表示します <SCRIPT language=VBScript> Dim Ie Set Ie = CreateObject("InternetExplorer.Application") Ie.Visible = True Ie.Navigate("http://hp.vector.co.jp/authors/VA003334/") function TargetLinkLoad() Dim AllList Set AllList = Ie.Document.all For Each AllObject in AllList on error resume next document.write AllObject.href & "<br>" on error goto 0 Next Ie.Quit end function </SCRIPT>