<% ' opret XML og indlæs Set xml = CreateObject("MSXML.DOMDocument") xml.Async = False xml.Load(Server.MapPath("test.xml")) ' opret XSL og indlæs Set xsl = CreateObject("MSXML.DOMDocument") xsl.Async = False xsl.Load(Server.MapPath("test.xsl")) ' udskriv XML transformeret til HTML Response.Write xml.TransformNode(xsl) %>