/ Published in: ASP
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
<% 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 %>