From: Théophile Studer (theo@sefanet.ch)
Date: 06/07/2004 - 18:23
Comme code tu donnes :
<% @ Language=VBScript %>
<%
Dim xml
set xml =server.CreateObject("Msxml2.DOMDocument.3.0")
xml.async = false
xml.load(Server.MapPath("monXML.xml"))
Dim xsl
set xsl =server.CreateObject("MSXML2.FreeThreadedDOMDocument.3.0")
xsl.async = false
xsl.load(Server.MapPath("maXSL.xml"))
Dim xslt
Dim xslProc
Set xslt = server.CreateObject("MSXML2.XSLTemplate.3.0")
xslt.stylesheet = xsl
Set xslProc = xslt.createProcessor()
xslProc.input = xml
xslProc.addParameter "MonParametre",
cstr(Request.QueryString("Parametre"))
xslProc.Transform
response.write(xslProc.output)
%>
Et si je ne veux pas du Made-in MS ?
Théo
--
Devenez redacteur <XML>fr et contribuez au developpement du
xml francophone (http://xmlfr.org/infos/redacteurs/) !
Liste de diffusion "xml-tech@xmlfr.org" (http://xmlfr.org).
Cette liste est a votre disposition pour discuter en francais de
tout sujet technique lie a XML.
Pour resilier votre abonnement, envoyez un message contenant
la commande "unsubscribe" a xml-tech-request@xmlfr.org
(mailto:xml-tech-request@xmlfr.org?Subject=unsubscribe)
Archive générée par hypermail 2.1.3 le 30/07/2004 - 13:32 UTC
webmaster@xmlfr.org
|