Salut
Vous pouvez essayer le code comme suit :
OIE = CreateObject (« InternetExplorer.Application
»)
OIE
. Navigate2
(«
www.facebook.com ")
loDocument
= OIE. Document
POUR LinkNo = 1 à lDocument.links.length CurrentLink = lDocument.links (LinkNo) SI HAUT de $ « de POTEAUX PLUS ANCIENS » (CurrentLink.innerText) CurrentLink.Click () endif ENDFOR