How To Cause Navigation to Occur in Same WebBrowser Window

MORE INFORMATION

1. Create a form with a WebBrowser control on it.
2. In the declarations section of that form, add the following:

         Dim WithEvents Web_V1 as SHDocVwCtl.WebBrowser_V1
   						

   This will declare a WebBrowser_V1 variable that can receive events WebBrowser_V1 provides you with the NewWindow event.
3. In the Form_Load event, add the following:

         Set Web_V1 = WebBrowser1.Object
   	  WebBrowser1.Navigate2 "http://www.microsoft.com/"
   						

   This sets the WebBrowser_V1 object to the existing Internet Explorer WebBrowser object.
4. After the NewWindow2 event fires, the Web_V1_NewWindow event will fire with the linked URL as one of its input arguments. Remember not to set Cancel to True in NewWindow2. Also, set the Processed variable to True in the NewWindow event handler so that a new instance of Internet Explorer will not be created. The following code shows this event handler and the code necessary to navigate within the current window:

         Private Sub Web_V1_NewWindow(ByVal URL As String, _
                                      ByVal Flags As Long, _
                                      ByVal TargetFrameName As String, _
                                      PostData As Variant, _
                                      ByVal Headers As String, _
                                      Processed As Boolean)
            Processed = True
            WebBrowser1.Navigate URL
         End Sub
   					

5. Right-click a link and select "Open in New Window" and you will find the link will still open inside your WebBrowser Control.
   
   Please note that Internet Explorer does not fire a NewWindow or NewWindow2 event when the user presses CTRL+N or points to New under the File menu and clicks Window.