Serverside XML

Hej
Du skal bare bruge XMLHTTP, som eksemplet viser herunder:
<%
Option Explicit
Dim ObjSXH, ObjXML, ObjXSL
'Using MSXML 3.0 ServerXMLHTTP Class
Set ObjSXH = Server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
'GET Request through SQLXML from www.sygeplejersken.dk
ObjSXH.open _
  "GET", _
  "http://www.servernavn.dk/mappe/xml_fil.asp", _
  False
'Send the request
ObjSXH.send ""
'If the request succeeded
If ObjSXH.status = 200 Then
      'returned XML as a DOMDocument
      Set ObjXML = ObjSXH.responseXML
      'Load the XSLT stylesheet
      Set ObjXSL = Server.CreateObject("Msxml2.DOMDocument.3.0")
      ObjXSL.load Server.MapPath("/mappe/xsl/stylesheet.xslt")
      'Apply XSL Transformation and write the HTML result
      Response.Write (ObjXML.transformNode(ObjXSL))
Else
    Response.Write("Der opstod en fejl. Prøv igen senere.")
End If%>

Ignorér kommentarerne i denne linie:
'GET Request through SQLXML from www.sygeplejersken.dk
Den skulle have været fjernet, det er fra noget kode jeg selv har brugt. Sorry.
Koden virker som den skal :-)

Hej skovtrold
Jeg løste godt nok problemet ved at bruge objXML.loadxml(RS("xml")), men jeg vil ihvertfald afprøve den her.
Jeg læste ellers på msdn at serverside ikke understøttede xmlhhtp ?

Tak for svaret.
vhE1