<%
	dim xslDoc, xmlDoc
	
	set xmlDoc=server.CreateObject("Msxml2.FreeThreadedDOMDocument.3.0")
	set xslDoc=server.CreateObject("Msxml2.FreeThreadedDOMDocument.3.0")
	
	xmldoc.async = false
	xslDoc.async = false
	
	xmlDoc.load server.mapPath("unimac_models.xml")
	xslDoc.load server.mapPath(strXSLFile)
	
	Set template = Server.CreateObject("MSXML2.XSLTemplate.3.0") 
	Set template.stylesheet = xslDoc
	Set proc = template.createProcessor  

	proc.input = xmlDoc 

	proc.addParameter "modelid", strModel  
	proc.addParameter "seriesid", strSeries    

	response.Charset = "UTF-8"
	proc.output = response
	proc.transform 
%>

XML/XSL request

xml, ASP

ASP