現在VB6.0よりIEを起動し、
IEに表示させたページのソースを
VBから取得しています。

このような形、

'IEを起動する
Set objIE = CreateObject("InternetExplorer.application") 'IEのオブジェクトを作る
objIE.Visible = True

objIE.Navigate "http://xxxxxxxxxxxxxxx.xxxxx.xx.jp"

strHTML = objIE.document.body.innerHtml

IEではなく、デフォルトブラウザで同じように
ブラウザを起動しソースを取得したいのですが、
やりかたが、わかりません。
どなたか教えてください。

> IEではなく、デフォルトブラウザで同じように
> ブラウザを起動し
CreateObject("WScript.Shell").Run URL


> ソースを取得したいのですが、
それは無理でしょう。
他のブラウザで、そのような機能が公開されているという保証はありませんよね。

なので、ソースだけは別途取得し、ブラウザ起動とは分けるという方向になるかと。

もうすこし詳しく書きますと、
VBよりブラウザを起動します。

表示されたブラウザにて、
あるリンクをクリックします。

そして、遷移先のページが表示されたら、
その遷移先のソースを取得、
その遷移先（ソースで判断する）によって、VBでの動作を変えたいのです。

なので、ソースを取得するのは最初のページではなく。
つぎのページなのです。

現在は、VBより起動したIEオブジェクトのソースを
タイマーで数秒おきに監視し、ソースに該当部分あったら、
とゆう感じで判断しております。

さらに無理ですよね〜〜？

> そして、遷移先のページが表示されたら、
> その遷移先のソースを取得、
> その遷移先（ソースで判断する）によって、VBでの動作を変えたいのです。

IE なら、NavigateComplete2 イベントあるいは DocumentComplete イベントで拾えるかと。

> > そして、遷移先のページが表示されたら、
> > その遷移先のソースを取得、
> > その遷移先（ソースで判断する）によって、VBでの動作を変えたいのです。
>
> IE なら、NavigateComplete2 イベントあるいは DocumentComplete イベントで拾えるかと。

なるほど、そのようなイベントがあるのですね。
ありがとうございます。

IE以外のデフォルトブラウザはやはり無理なようですね。

ありがとうございました。