Lire une page web en vb.net

Aujourd’hui je vous propose un petit code un peu brouillon qui vous permettra de lire facilement une page web en vb.net. Il suffit de changer https://www.example.com/test.html par l’adresse de ce que vous voulez lire (page html, flux rss, etc…). Le code source de la page sera contenue dans la variable html.

Dim source As New System.Text.StringBuilder
Dim html As String = ""
Dim maximum As Integer
Dim request As HttpWebRequest = WebRequest.Create("http://www.example.com/test.html")
Dim response As WebResponse = request.GetResponse()
Dim reader As StreamReader = New StreamReader(response.GetResponseStream())
Do
  source.Append(reader.ReadLine() + vbCrLf)
Loop Until reader.ReadLine() Is Nothing
maximum = source.Length - 1
For i As Integer = 0 To maximum
  html = html + source(i)
Next
reader.Close()
response.Close()