教育系统应用

开发平台：

Delphi

dirlist.asp：源码内容

							<%
'Load the XML
set xml = Server.CreateObject("Microsoft.XMLDOM")
xml.async = false
xml.load(Server.MapPath("dirlist.xml"))
'Load the XSL
set xsl = Server.CreateObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load(Server.MapPath("dirlist.xsl"))
Response.Write(xml.transformNode(xsl))
%>
 

						