web new window

[Mohammed]

Hi, why anytime I open new window using web browser control, and when I am done with it, and close it. The entire program close (END).
Thank you,
Please help, with code for open new window.

[Dubious]

This should create a new instance of your browser. I am not sure why your program ends when you close out a new window. It shouldnt. If you need more help email at bvozza@okid.com


Private Sub wbBrowser_NewWindow2(ppDisp As_ Object, Cancel As Boolean)
'declare a new instance of the form
Dim frmBrowser2 As frmBrowser
Set frmBrowser2 = New frmBrowser
Set ppDisp = frmBrowser2.wbBrowser.Object
'offset the new window (twips)
frmBrowser2.Move 1000, 500, 14500, 14500
frmBrowser2.Show