--
Julien balas
-----------------------------------
en PHP+sablotron
<?
$ficXml = "g2.xml";
$ficXsl = "g2.xsl";
$fp = fopen( $ficXsl,"r");
$length = filesize( $ficXsl);
$strXsl = fread( $fp, $length);
$fp = fopen( $ficXml,"r");
$length = filesize( $ficXml);
$strXml = fread( $fp, $length);
if( xslt_process ( $strXsl, $strXml, $result)) {
print $result;
} else {
print "Il y a une erreur";
}
?>
---------------------------------
en ASP+MSXML
<%Option Explicit%>
<%
sub Charger(p_obj, p_nomFic)
p_obj.load p_nomfic
'Check for a successful load of the XML Document.
if p_obj.parseerror.errorcode <> 0 then
Response.Write "Error loading Document :'" & p_nomfic & "'<BR>"
Response.Write "----------------------------" & "<BR>"
Response.Write "Error Code : " & p_obj.parseerror.errorcode & "<BR>"
Response.Write "Reason : " & p_obj.parseerror.reason & "<BR>"
Response.End
End If
end sub
Dim xmldoc ' le document XML
Dim xsldoc ' la feuille XSL
Dim nom_fic ' le bom du fichier XML
Set xmldoc = Server.CreateObject("MSXML2.DOMDocument")
Set xsldoc = Server.CreateObject("MSXML2.DOMDocument")
nom_fic = "g2.xml"
Charger xmldoc, Server.MapPath(nom_fic)
Charger xsldoc, Server.MapPath("g2.xsl")
Response.Write xmldoc.TransformNode(xsldoc)
set xmldoc = nothing
set xsldoc = nothing
%>
-------------------------------------
--
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)
