Pestaña de webbrowser en el NewWindow2

Iniciado por SheKeL_C$, 23 Marzo 2010, 18:51 PM

0 Miembros y 1 Visitante están viendo este tema.

SheKeL_C$

Private Sub WebBrowser_NewWindow2(ppDisp As Object, Cancel As Boolean)


'Cancelamos la ventana del explorador predeterminado
Cancel = True

'Creamos una nueva instancia del navegador, es decir del formulario
Set NuevaVentana = New FrmWeb
   
    NuevaVentana.Show 'lo hacemos visible
    'cargamos la página en esta nueva ventana
    NuevaVentana.WebBrowser.Navigate lblStatusbar

End Sub


Private Sub Form_Unload(Cancel As Integer)

'Eliminamos la variable de tipo FrmWeb cuando descargamos el Formulario
Set NuevaVentana = Nothing

End Sub


El codigo de arriba lo encontre en recursosvisualbasic. Lo que hace es que al detectar que la web quiere abrir otra instancia al pinchar en un enlace pues se abre otra ventana y se dirige al enlace que has pinchado.

Yo lo que tengo es un form y dos webbrowser, lo que quiero es que al pinchar en un enlace en que se me vaya a abrir otra ventana no lo haga.. sino que se habra en el segundo webbrowser

SheKeL_C$

Me respondo a mi mismo xD

Tan solo hay que poner una linea en el Newwindow2

Set ppDisp = WebBrowser2.Object