Como sacar el codigo fuente de una web con Visual Basic NET (2008 y 2010 en adelante)
Bueno, como primer paso vamos a crear un nuevo proyecto en Visual Basic y agregamos:
1 WebBrowser
1 Boton
1 Textbox (Pongan la opcion multiline y agrandelo)
Codigo:
Try
Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://google.com"
Dim response As System.Net.HttpWebResponse = request.GetResponse()
Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())
Dim sourcecode As String = sr.ReadToEnd()
TextBox1.Text = sourcecode
Catch ex As Exception
MessageBox.Show("Invalid Url"
Return
End Try
----------------------------
Para aplicarlo hagan doble click en el boton1 y peguenlo ahi.
Bien! como podran ver el codigo tiene como default sacar el codigo fuente de Google, pero lo pueden cambiar por la pagina que uds quieran, pero para hacerlo mas comodo y no tener que andar editando el codigo por cada web que desees sacar el codigo fuente, vamos a hacer lo siguiente..
Agregamos otro Textbox y ponemos este codigo:
Try
Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://" & TextBox2.Text)
Dim response As System.Net.HttpWebResponse = request.GetResponse()
Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())
Dim sourcecode As String = sr.ReadToEnd()
TextBox1.Text = sourcecode
Catch ex As Exception
MessageBox.Show("Invalid Url"
Return
End Try
----------------------------
En este caso tenes que poner WWW. y la web que quieras en el textbox2
Con eso ya tendriamos todo bien, suerte con eso!

