[VB] extraction ciblé page web
Posté : mar. 10 avr. 2012 20:50
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 :
Set ie = CreateObject("InternetExplorer.Application")
Set objFSO= CreateObject("Scripting.FileSystemObject")
ie.Navigate ("https://www.epexspot.com/en/market-data ... ion-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)?
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 :
Set ie = CreateObject("InternetExplorer.Application")
Set objFSO= CreateObject("Scripting.FileSystemObject")
ie.Navigate ("https://www.epexspot.com/en/market-data ... ion-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)?