Composant INET en vb.net 2008Résolu

Question

Bonjour à tous,

Voici mon problème:
J'ai développé, en VB6, un petit programme qui récupérer la source d'une page web de 2 façons:
1) Avec le WebBrowser (TxtSrc = WebBrowser.Document.DocumentElement.InnerHtml)
2) Avec INET (TxtSrc = Inet1.OpenUrl(WebBrowser.LocationUrl)
Les deux sources récupérées m'etaient indispensables puisque je retrouvai des infos dans un format que je n'avai pas dans l'autre.

Je suis maintenant passé en VB.NET 2008 et la récupération de la source de la page avec le WebBrowser fonctionne (après qualque modif) mais pas avec le composant INET!

Voici donc ma question:
Comment utiliser INET avec VB.NET 2008 ou quel composant faut-il utiliser pour obtenir le même résultat et comment le faire?

Merci d'avance à tous ceux qui pourront m'aider

Utilisateur anonyme · Accepted Answer

Bonsoir acive,

nous avons déjà discuté de ce point avec un autre demandeurEffectivement, je me suis contenté d'un copier-coller.

Tu devrais être à l'apéro

Utilisateur anonyme · Answer

Bonsoir,

Tu peux récupérer le code source d'une page simplement de cette façon :
label1.text = New IO.StreamReader(Net.WebRequest.Create("http://www.google.fr").GetResponse.GetResponseStream).ReadToEnd

Tout est regroupé en une ligne mais tu peux bien sûr la décomposer.
Assure toi de gérer les erreurs éventuelles (comme un site injoignable par exemple).
Bonne prog.

acive · Answer

Salut, 
Ou si tu affiches la page dans un webbrowser tu peux avoir le texte sans les balises.
Banana et moi, nous avons déjà discuté de ce point avec un autre demandeur sur le forum...



Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("www.google.fr")
End Sub

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        Label1.Text = WebBrowser1.Document.Body.OuterText
    End Sub


CF2i - Guadeloupe
Ingénierie Informatique

Composant INET en vb.net 2008

3 réponses

Votre réponse

Discussions similaires