ARGH!!! Hente data fra eksterne sider...
Okay... last try. Jeg skal hente valutakurser fra en ekstern side (nationalbanken) og præsentere på en webside. Jeg har fået et PHP-script som skulle løse dette. Imidlertid har jeg ikke den fjerneste ide om hvordan de virker og har også hørt det er for resourcekrævende og skulle laves i ASP. Det kan jeg heller ikke... kan I kære eksperten ikke nok hjælpe mig ???--- Her er det PHP-script jeg fik (hvis det er til nogen hjælp) ---
Set IE = WScript.CreateObject("InternetExplorer.Application")
set RegExp = New RegExp
' Lad IE hente siden med kurser
ie.navigate "http://www.nationalbanken.dk/nb/nb.nsf/alldocs/Dvalutakurser?OpenDocument"
' Vent på IE til siden er hentet og objektmodellen er dannet
do until ie.readystate = 4: loop
set doc = IE.Document
' Find den første tabel på siden
set table = doc.all.tags("TABLE").item(0)
' Find dato (3. række, 2. kolonne)
wscript.echo "Valutakurser pr. " & table.rows(2).cells(1).inntertext & ":"
' Løb tabellen igennem
for each row in table.rows
' Brug RegExp til at finde de celler som indeholder en "(" og 3 store bogstaver og ")"
regexp.pattern ? "\([A-Z]{3}\)"
set match = regexp.execute(row.cells(0).inntertext)
if match.count>0 then
id = mid(match.item(0) ,2 ,3)
kurs = row.cells(1).innertext
' Udskriv til skærm
wscript.echo id & ": " & kurs
end if
next
' Oprydning
set IE = Nothing
--------------
