I believe this will also prevent the new window. I don't know if it will deal with popups in the same manner as your method does.

In NewWindow3 in the first (visible) browser

thisform.xoleweb2.RegiserAsBrowser = .t.
ppdisp = thisform.xoleweb2.object
CANCEL = .t.


A second web browser control may not be required. I did a very quick test of not using a second browser and the new window didn't appear.

In NewWindow3 where ofrm is the containing form and obrowser is the browser control

ofrm.obrowser.RegisterAsBrowser = .t.
ppdisp = ofrm.obrowser.object
CANCEL = .t.


A related use of this is if you want to send any new window request to a specific form/browser control.

In NewWindow3 of the first form and where ofrmn is the 2nd form and obrowser is the browser control in that form

ofrmn.obrowser.RegisterAsBrowser = .t.
ppdisp = ofrmn.obrowser.object