Hello Alain, Hello à tous!
J'ai lu cette discussion.
Je reprend le code et malheuresement je n'arrive pas à faire fonctionner le tiens (celui de Henri marche par contre, mais il m'a l'air un peu plus 'bourrin')
Je ne suis pas à l'aise en HTML et je ne comprend pas trop comment tu navigues dans les items, et je me demande si le site n'a pas changé (ce qui expliquerait peut être pourquoi il ne trouve rien).
Doit-on reproduire dans les boucle de recherche l'arborescence des balises ?
Du coup je pense que c'est cette partie là qui ne match plus :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 For Each oDiv In oDoc.getElementsByTagName("DIV") If oDiv.className = "bd" Then If InStr(1, oDiv.innerHTML, "PMSelect") > 0 Then Set oTable = oDiv.Children(2) strDernEch = oTable.Cells(2).outerText Exit For End If End If Next oDiv
Voici le lien que j'utilise comme exemple : http://www.boursorama.com/cours.phtm...ate=2008-01-30
Et la valeur que j'essaye d'avoir sur la page est celle face au champ : Dernier échange
Merci d'avance !
MonSavon![]()
Partager