Titre: [VB] Recuperer la source d'une page Posté par: Nox le 20 Octobre 2005 à 11:19:37 Bonjour a tous ,
ici je vais expliquer comment recuperer le code source d'un page html par le biai de visual basic (a pas confondre avec visual basic script) 1) Creez un nouveau projet contenant une nouvelle form 2) Creez un composant Inet (Microsoft Internet Transfert Control) et nommez le "web" [name : web] 3) Mettez au composant inet le protocole http [protocol : 4-icHTTP] 4) Double cliquez sur votre form , vous arrivez dans Sub Form_Load() 5) Tapez le code suivant : web.Execute ("www.google.fr") While web.StillExecuting = True: DoEvents: Wend MsgBox web.GetChunk(2048) on obtient le code suivant : Private Sub Form_Load() web.Execute ("www.google.fr") While web.StillExecuting = True: DoEvents: Wend MsgBox web.GetChunk(2048) End Sub 6)Lancez le programme et admirrez =) Ce code est pas compliquez mais pour ceux qui veulent des explication approfondies n'hesitez pas :wink: Titre: [VB] Recuperer la source d'une page Posté par: Luther le 20 Octobre 2005 à 12:15:55 Pas mal, je te montre comment je fais moi :D (je sais pas si c'est mieux)
Private Sub Form_Load() WebBrowser1.Navigate "http://www.url_html_a_recuperer.com" End Sub Private Sub WebBrowser1_DownloadComplete() contents = WebBrowser1.Document.documentElement.innerHTML End Sub 'contents contient le code source de la page Titre: [VB] Recuperer la source d'une page Posté par: Nox le 20 Octobre 2005 à 12:42:27 Oui c'est pas mal non plus =)
|