extraction ciblé page web
Bonjour,
Sur un site web ( https://www.epexspot.com/en/market-d.../2012-04-10/FR) , je dois extraire des tableaux la colonne correspondant à la date la plus récente soit le 2012-04-11 .
J'ai écris un script mais celui ci extrait toute la page :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
| Set ie = CreateObject("InternetExplorer.Application")
Set objFSO= CreateObject("Scripting.FileSystemObject")
ie.Navigate ("https://www.epexspot.com/en/market-data/auction/auction-table/"""& Year(date) &"""-"""& Month(date) &"""-"""& Day(date) &"""/FR")
ie.Visible=false
DO WHILE ie.busy
LOOP
Data = ie.document.documentElement.innertext
DataHTML = ie.document.documentElement.innerHTML
strFileHTML = "exportHTML.txt"
Set objHTMLFile = objFSO.OpenTextFile(strFileHTML,2,True)
objHTMLFile.WriteLine(DataHTML)
objHTMLFile.Close
ie.Quit
Set ie=Nothing
call Explorer(strFileHTML)
wscript.Quit
Function Explorer(File)
Set ws=CreateObject("wscript.shell")
ws.run "Explorer.exe "& File & "\"
end Function |
Pouvez vous m'aider à comprendre comment n'extraire que la colonne correspondant à la date d'aujourd'hui(sur tous les tableaux)?