Education soft system

Development Platform:

Delphi

dirlist.asp：Code Content

							<%
'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))
%>
 

						