Dudas creando navegador en VB.NET

Iniciado por jotahacker, 14 Octubre 2007, 17:12 PM

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

jotahacker

Hola a todos!! Bueno, estoy creando un navegador de internet en VB.NET, y de momento todo bien, pero me han surgido algunos problemillas, y espero que puedan ayudarme. El primer problema es que con los popups, enlaces que se abren en otra ventana,etc se me abre el internet explorer, y es una faena, bueno, pues he hecho que se me abra otra ventana de mi navegador para ver esas paginas, pero se me sigue abriendo el internet explorer (junto con mi navegador).De momento tengo este codigo para que se abra otra ventana de mi navegador:
Private Sub WB1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WB1.NewWindow
        Dim frm_web As Form1
        'Nueva instancia del formulario
        frm_web = New Form1
        frm_web.Show()
        frm_web.WB1.Navigate(lbEstado.Text)
  End Sub

Que puedo hacer para que no se abra el internet explorer? Por favor, ayudenme. Muchas gracias por adelantado.
Saludos!!



Surfiction

#1
Bueno pues veo que ya tenias el codigo listo para abrir el popup con tu propio webbrowser, pero ademas de abrirse en el tuyo se abria en el Iexplorer, pues lo unico que necesitabas era agregar  esta linea

e.Cancel = True 'Evita que se abra el iexplorer

Tu codigo quedaria asi

Private Sub WB1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WB1.NewWindow

        e.Cancel = True 'Evita que se abra el iexplorer
        Dim frm_web As Form1
        'Nueva instancia del formulario
        frm_web = New Form1
        frm_web.Show()
        frm_web.Width = 200
        frm_web.Height = 200
        frm_web.WB1.Navigate(lbEstado.Text)

    End Sub

jotahacker

Muchas gracias Surfiction por tu codigo!! Ahora ya va perfecto. Pero ahora tengo otra duda. Me gustaria ponerle pestañas al navegador para que se abriesen los popup's en pestañas distintas. De momento investigando sin parar he conseguido (eso creo ;D) crear otra pestaña, en ejecucion, al TabControl con el siguiente codigo:
        Dim myTabPage As New TabPage()
        myTabPage.Text = "TabPage" & (TabControl.TabPages.Count + 1)
        TabControl.TabPages.Add(myTabPage)

Bueno, ese codigo se ejecuta al pulsar un boton para abrir una nueva pestaña, y para que se hiciese automatico al saltar un popup supongo que seria colocarlo al igual que el anterior. Bueno, mi pregunta ahora es, como puedo hacer para que se cree dentro de myTabPage un webbrowser igual que el que tengo en un principio,para poder usar los botones de navegación,etc... Por favor, diganme como hacer para la navegación por pestañas. Muchas gracias por la ayuda.

Saludos!!



Surfiction

Con esto bastara para que se abra en una pestaña nueva

Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow

        e.Cancel = True
        Dim nueva As New TabPage
        Dim navegador As New WebBrowser
        nueva.Text = lbEstado.Text
        navegador.Size = WebBrowser1.Size
        navegador.Parent = nueva
        navegador.Navigate(lbEstado.Text)
        pagina.TabPages.Add(nueva)

    End Sub

jotahacker

Hola y muchas gracias de nuevo por tu ayuda!! Bueno, una vez hecho esto (que se me abra una nueva pestaña al haber un popup), pero ahora se me presenta un nuevo problema, y sinceramente no se si sera posible solucionarlo, porque yo no encontre nada en internet y solo me queda buestra ayuda!
Bueno, tengo un ComboBox desde el pongo la URL y navega, pero como puedo hacer para que al tener otra pestaña abierta el ComboBox sirva tambien para navegar dentro del WebBrowser nuevo creado en la nueva pestaña, y ademas que los botones de navegacion funcionen dependiendo de la tabla que este seleccionada.

Muchas gracias!!
Saludos!!



Surfiction

disculpa no e tenido tiempo pa entrar , pero ahorita buskamos la forma de resolver eso ^^

jotahacker

ok, no te preocupes. Espero tu respuesta.

Saludos!!



chuy87

oye amigo jota me puedes decir como llamas al metodo webbrowser_newwindow
te lo agradeceria mucho

thegamingrip

Hola a todos!!! yo tengo un gran problema para mi caso... es que cuando me abre la nueva ventana me carga los 2 hipervinculos a la vez...

yo lo que quiero es que solo cargue en la popup que se abre... como debe ser...

alguien tiene idea?

el codigo que utilizo es:

Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow

        Dim NewURL As String = CType(sender, WebBrowser).StatusText
        Dim frmNew As New explorer2
        frmNew.WebBrowser1.Navigate(NewURL)
        frmNew.Size = New Size(600, 780)
        e.Cancel = True
        WebBrowser1.Stop()
        frmNew.Show()

    End Sub