asp在服务器把 XML 转换为 XHTML的实现代码

复制代码                                                                                                                      代码如下:

<% 

'Load XML 

set xml = Server.CreateObject("Microsoft.XMLDOM") xml.async = false xml.load(Server.MapPath("cdcatalog.xml")) 

'Load XSL 

set xsl = Server.CreateObject("Microsoft.XMLDOM") xsl.async = false xsl.load(Server.MapPath("cdcatalog.xsl")) 

'Transform file 

Response.Write(xml.transformNode(xsl)) 

%>