<%@language=vbscript%> <% 'Load XML set xml = Server.CreateObject("Microsoft.XMLDOM") xml.async = false xml.load(Server.MapPath("gallery.xml")) 'Load XSL set xsl = Server.CreateObject("Microsoft.XMLDOM") xsl.async = false xsl.load(Server.MapPath("index-8.xsl")) 'Transform file Response.Write(xml.transformNode(xsl)) %>