07/03/12 00:45:56 JMJM6ows0
>>775
ie = CREATEOLEOBJ("InternetExplorer.Application")
ie.Navigate("www.honda.co.jp/")
ie.Visible = True
public ie2 = CREATEOLEOBJ("InternetExplorer.Application")
ie2.Navigate("www.google.com")
ie2.Visible = True
OLEEVENT(ie,"DWebBrowserEvents2","NewWindow2","NewWindow2")
fukidasi("ESCで終了")
while !GetKeyState(VK_ESC)
sleep(0.1)
wend
procedure NewWindow2()
print "newWindow2"
EVENT_PRM[1] = ie2
fend
NewWindow2ならこんな感じであらかじめ準備しておいた
任意のieで開かせることができたけど
NewWindow3のほうはなぜかできないね。
>でも新ウィンドウ起動しちゃう
これはNewWindow2でも3でも再現した。
念のため「True」の代わりに-1入れてみたけどやっぱりだめだった。