EXTRAIRE LE CONTENU D'UNE PAGE WEB

bibi_81 Messages postés 345 Date d'inscription jeudi 2 septembre 2004 Statut Membre Dernière intervention 25 octobre 2007 - 16 oct. 2004 à 09:35
Mike Gagnon Messages postés 381 Date d'inscription vendredi 15 octobre 2004 Statut Membre Dernière intervention 24 octobre 2013 - 18 oct. 2004 à 20:04
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/26877-extraire-le-contenu-d-une-page-web

Mike Gagnon Messages postés 381 Date d'inscription vendredi 15 octobre 2004 Statut Membre Dernière intervention 24 octobre 2013 2
18 oct. 2004 à 20:04
Oui mais je préfère encore plus la flexibilité de ceci

1. No tags

oIE = createobject('internetexplorer.application')
oIE.Navigate('www.tek-tips.com')
lcStr=oIe.Document.body.innertext
?lcStr

2. With the HTML tags included.


CODE
oIE = createobject('internetexplorer.application')
oIE.Navigate('www.tek-tips.com')
lcStr=oIe.Document.body.innerHTML
?lcStr
FredArmoni Messages postés 153 Date d'inscription vendredi 2 mai 2003 Statut Modérateur Dernière intervention 2 avril 2010
18 oct. 2004 à 18:56
Mike,
url="http://www.foxprofr.com/rss.aspx?type=code"
loHTTP = CreateObject("MSXML2.XMLHTTP")
loHTTP.Open("GET", url, .F.)
loHTTP.Send
StrToFile(loHTTP.ResponseText, "c:\test.xml")
modify file c:\test.xml
* voir à mettre en place :
* XMLtoCursor(loHTTP.ResponseText,...)

;)

Fred
bibi_81 Messages postés 345 Date d'inscription jeudi 2 septembre 2004 Statut Membre Dernière intervention 25 octobre 2007
16 oct. 2004 à 09:35
Yo, Il est tout nouveaux ce truc et je ne sais pas ce que c'est que le fowpro alor je pense déja a e l'HTML ou a autre chose mais bon pas trop quand même...
Rejoignez-nous