lannes64
Messages postés1Date d'inscriptionmardi 16 février 2010StatutMembreDernière intervention10 avril 2012
-
10 avril 2012 à 21:12
Genildf
Messages postés270Date d'inscriptionlundi 12 janvier 2009StatutMembreDernière intervention30 décembre 2015
-
11 avril 2012 à 15:13
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/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)?