Return to Snippet

Revision: 1685
at November 9, 2006 12:32 by ryanprel


Initial Code
<%
	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 
%>

Initial URL

                                

Initial Description

                                

Initial Title
XML/XSL request

Initial Tags
xml, ASP

Initial Language
ASP