ウェブページを読込み完了したら次の処理へ - 改良版

AppleScript : ウェブページを読込み完了したら次の処理へ - GameSprit という記事を投稿したのですが、時々エラーが発生することに気づきました。

そのため、次のように書き換えてみました。

on loadURL(tgt)
	set mk to 0
	tell application "Safari"
		open location (tgt as string)
		
		delay 0.5
		repeat until (mk = 1)
			try
				set theSource to get the source of document 1
				if theSource contains "</html>" then set mk to 1
			on error
				delay 0.5
			end try
		end repeat
		
	end tell
	return theSource
end loadURL

--（Mac OS X Snow Leopard 10.6.6)

しばらく、これで様子を見てみます。


ところで、明日から寒くなりそうですね。
凍えそうな週末です。


天気予報

日付	1月15日(土)
天気	くもり のち 雪か雨

兵庫南部(神戸)の天気 - goo 天気


キーワード：AppleScript、ウェブページを読込み完了したら次の処理へ、変数エラー、フラッグ、repeat until、try、寒