Hent data fra ekstern hjemmeside

Eksempel fra http://www.4guysfromrolla.com/webtech/110100-1.shtml#postadlink :

<%
  Response.Buffer = True
  Dim objXMLHTTP, xml

  ' Create an xmlhttp object:
  Set xml = Server.CreateObject("Microsoft.XMLHTTP")
  ' Or, for version 3.0 of XMLHTTP, use:
  ' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")

  ' Opens the connection to the remote server.
  xml.Open "GET", "http://www.4Guysfromrolla.com/", False
   
  ' Actually Sends the request and returns the data:
  xml.Send

  'Display the HTML both as HTML and as text
  Response.Write "<h1>The HTML text</h1><xmp>"
  Response.Write xml.responseText
  Response.Write "</xmp><p><hr><p><h1>The HTML Output</h1>"

  Response.Write xml.responseText

 
  Set xml = Nothing
%>


Du skal selv parse resultatet, som finde i xml.responseText ..
Dvs, du skal selv udtrække den tekst du skal bruge..

Du skal nok have en aftale med www.cse.dk for at være på den sikre side.. du kan bare sende dem en mail, og forklare dem lidt om scriptet.

Du kan finde flere eksempler, ved at søge på følgende via en søgemaskine:

asp XMLHTTP

asp ServerXMLHTTP

Svar.

Kan du ikke også lige vise mig hvordan man parse resultatet? Det har jeg nemlig heller aldrig prøvet før...

Du kan finde funktionerne her: http://www.w3schools.com/vbscript/vbscript_ref_functions.asp

Det er specielt String-funktionerne du skal bruge: http://www.w3schools.com/vbscript/vbscript_ref_functions.asp#string

Du får bruge for:

InStr, Left, Mid, Right og måske InStrRev.

Der kan også være andre, men det er de mest brugte.

Det vil nok også være en god ide, at kigge på Array-funktionerne: http://www.w3schools.com/vbscript/vbscript_ref_functions.asp#array

Her er de konverteringsfunktioner (så du kan omregne fra/til valuta): http://www.w3schools.com/vbscript/vbscript_ref_functions.asp#conversion

Det burde være nok..