HSPTV!掲示板

先日教えてもらった「WEB情報を取得するサンプル」を繰り返し実行していると、突然「内部エラー39」が出て接続に失敗するようになりました。

自分なりに調査してみましたが原因がわかりません。

よろしくお願い致します。

newcom ie, "InternetExplorer.Application",0,0
//IEを表示しない
ie("Visible")=0
URL = "http://yahoo.co.jp"
ie->"Navigate" URL
repeat
wait 10
if ie("readyState") = 4 : break
loop

pDoc = ie("document")
pBody = pDoc("body")
src = pBody("innerHTML")

mes src

IEコンポーネントの開放処理がないので、プロセスが残ってしまっている気がします。
タスクマネージャでiexplore.exeをすべて落とした後、

delcom pBody
delcom pDoc
ie->"Quit"
delcom ie

を最後に追加してみては？

mes src

の後でいいですよ〜
loopの後ですと、IEを閉じてしまうのでinnerHTMLからソースを持ってこれなくなってしまいます><
(多分エラーになるかと思います)

＞totoriさん

ありがとうございます。
うまくいきました（＾＾）

※仰る通り"loop"の後だとエラーとなりました。

あ、前ソース書いたものです
繰り返しちゃうとバグっちゃうので
totoriさんのものを追加していただければ解消します；；すみません

＞可憐さん

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

続けてこっちに書いちゃっていいのかなー？

上記のコードを追加した場合でも、タイミングか何等かの要因で前記のエラーが発生してしまう場合があり、その場合はやはりエラーで復帰できません。

最初の方に「delcom ie」を入れて実行して、一度エラー表示した後に「delcom ie」を消せば復帰できるのですが、ソフトを配布した後にこういったことはできないので、プログラム上でなんとかしたいのですが、何か方法はありますでしょうか？

自分なりにあちこち書き換えてやってみたのですが、根本がわかっていないのでやはりダメのようです。

対処法が分かる方いらっしゃったら、どうぞよろしくお願い致します。