Duda sobre Visual Basic 2008

[Andelous]

Hola mundo, este es mi primer tema, quiero ver si me pueden ayudar con algo...
hize un navegador web en VB 08 y quisiera saber como se podría ver el código fuente de la página haciendo clic en un botón o en un textbox, un label o lo que sea.

¡Espero sus comentarios y respuestas!
Veanlo a ver que me dicen http://www.megaupload.com/?d=NRNPQDTI

por favor, es de la escuela... 2° de secu

y de paso gracias.

[David]

Hola, Andelous.

Traslado el tema a una sección que encaja mejor con tu pregunta.
Tema trasladado desde la sección de Programación General.

Saludos.

[Peterpay]

mejor muestra codigo, es mas seguro y obtendras mas respuesta

que bajar tu aplicacion. =)

[Andelous]

Iniciado por Peterpay

mejor muestra codigo, es mas seguro y obtendras mas respuesta

que bajar tu aplicacion. =)

aqui mi código; Lo que quiero que haga es que, al abrir una nueva ventana o un 'Form', en un textbox multiline, muestre el Código fuente (solo body):

Public Class Form1

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Form2.Show()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
On Error Resume Next
[WebBrowser1].Navigate([ComboBox1].Text)
End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
On Error Resume Next
[WebBrowser1].[GoBack]()
End Sub

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
On Error Resume Next
[WebBrowser1].[GoForward]()
End Sub

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
On Error Resume Next
[WebBrowser1].Navigate([WebBrowser1].Url)
End Sub
End Class

[Peterpay]

Ok agrega un menu contextual para la opcion de click derecho sobre tu documento, y al usar un WebBrowser puedes acceder al document para ver el codigo fuente

Dim document As System.Windows.Forms.HtmlDocument = _
webBrowser1.Document

y en document sacar tu html y mostrarlo plano en tu textbox multiline

[Peterpay]

Ok agrega un menu contextual para la opcion de click derecho sobre tu documento, y al usar un WebBrowser puedes acceder al document para ver el codigo fuente

Dim document As System.Windows.Forms.HtmlDocument = webBrowser1.Document

y en document sacar tu html y mostrarlo plano en tu textbox multiline

[Andelous]

Ok, voy a probar