服务器端XSLT

<%

　　'Load the XML

　　set xml = Server.CreateObject("Microsoft.XMLDOM")

　　xml.async = false

　　xml.load(Server.MapPath("cd_catalog.xml"))

　　'Load the XSL

　　set xsl = Server.CreateObject("Microsoft.XMLDOM")

　　xsl.async = false

　　xsl.load(Server.MapPath("cd_catalog.xsl"))

　　'Transform the file

　　Response.Write(xml.transformNode(xsl))

　　%>