それっぽいことが出来ましたが、IE7でうまく動かないという情報あり。
ShellWindowsを使用して、起動済みIEを列挙。
このままだと、ファイルエクスプローラーも取得されてしまうので、
instrでファイルエクスプローラーか、IEかをフルパスで判定。
//IE6で動作確認
//IE7は不明
//区別がつくように、IEが既に起動済みの場合はhsp.tv
//IEが起動されていない場合はwww.onionsoft.netが表示されます。
flag=0//IEを見つけた場合は、1が入る
newcom sa, "Shell.Application"
comres wc
sa->"Windows"
i=wc("Count")//IE&ファイルエクスプローラーの数
comres nc //結果が返る
repeat i
wc->"Item" cnt
fn=nc("FullName")//ファイルのフルパス取得
//↓IEが1つでもあったらURLナビゲート
//複数のIEがある場合、どれが取得されるかは不明。
if instr(fn,0,"iexplore.exe")>1:nc->"navigate" "http://hsp.tv/":flag=1:break
loop
//IEが見つからない場合には新規に起動する。
if flag=0{
newcom ie, "InternetExplorer.Application"
ie->"navigate" "http://www.onionsoft.net/"
ie("Visible")=1
//後始末
delcom ie
}
//後始末
delcom nc
delcom wc
delcom sa