webbrowserコントロールで表示が遅い場合に再読み込みさせるには？

ハナ 2004-08-05 05:51:20 No: 115378

VB6.0上でwebbrowserコントロールを使っているのですが、表示させたいページがなかなか表示されない場合に、たとえば５秒以上たっても表示が完了しない場合は再読み込みさせたい、という時はどのようにすればよいのでしょうか？
よろしくお願いします。

SAS 2004-08-05 21:57:07 No: 115379

タイマーを設置し、WebBrowser1.Busyで５秒カウントさせて
５秒経った時にまだBusyならもう一度入力したアドレスを
ナビゲートさせる方法でいけると思います。

ただ、非常に重いＨＰや読み込みにバラつきがあるＨＰ
等では秒数の調整が必要かと思います。