Extraire le code source d'une page sous une variable.

Fermé
iFuizzy Messages postés 4 Date d'inscription mercredi 27 avril 2016 Statut Membre Dernière intervention 13 avril 2017 - 12 avril 2017 à 21:26
jordane45 Messages postés 38241 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 17 septembre 2024 - 13 avril 2017 à 13:03
Bonjour,
dans mon programme, j'aurais besoin d'extraire directement le code source d'une page et transformer ce code source en variable que je pourrais ensuite réutiliser dans la suite de mon programme.

J'aimerais de préférence que cela n'ouvre pas le navigateur et il faut absolument que l'URL du site se trouve déjà dans le programme et qu'il ne soit pas demander à l'utilisateur de mon programme, de sorte à ce que ce soit le plus invisible et le plus clean possible. :)

Merci d'avance si vous m'aidez :)
Bonne journée à tous ! :)

A voir également:

1 réponse

jordane45 Messages postés 38241 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 17 septembre 2024 4 689
Modifié le 13 avril 2017 à 01:41
Bonjour,

Essaye ça :

Sub Test()
  Const URL$ = "http://www.commentcamarche.net/forum/affich-34520083-extraire-le-code-source-d-une-page-sous-une-variable"

  Dim txt As String, i As Long
  With CreateObject("MSXML2.XMLHTTP")
    .Open "GET", URL, False
    .Send
    txt = .ResponseText
  End With
 
 'affichage de la variable dans la fenêtre d'execution de vbe
  Debug.Print txt
  
End Sub



Cordialement, 
Jordane                                                                 
0
iFuizzy Messages postés 4 Date d'inscription mercredi 27 avril 2016 Statut Membre Dernière intervention 13 avril 2017
13 avril 2017 à 13:00
Bonjour,
déjà merci pour ton aide mais malheureusement ça ne fonctionne pas :/
0
jordane45 Messages postés 38241 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 17 septembre 2024 4 689 > iFuizzy Messages postés 4 Date d'inscription mercredi 27 avril 2016 Statut Membre Dernière intervention 13 avril 2017
13 avril 2017 à 13:03
Comment ça ... ça ne fonctionne pas ?
Pourrais tu me donner plus d'infos sur le "dysfonctionnement" ?
Car chez moi...cela marche parfaitement...
0