'Crée la reqête Dim Request As HttpWebRequest = HttpWebRequest.Create("http://...") 'Défini la méthode GET, facultatif car GET est défini par défaut With Request .Method = "GET" 'On peut aussi gérer les paramètres de la requête, les entêtes etc... End With 'Obtient la réponse de la requête Dim Response As HttpWebResponse = Request.GetResponse 'Regarde le code de la réponse If Response.StatusCode = HttpStatusCode.OK Then 'Réponse 200 'Initialise le transfert des données Dim RemoteStream As IO.Stream = Response.GetResponseStream 'Récupère le contenu de la page Dim Data As String = New IO.StreamReader(RemoteStream).ReadToEnd End If