Soyez le premier à donner votre avis sur cette source.
Snippet vu 16 921 fois - Téléchargée 38 fois
<% dim objXML, objXSLT dim allok allok = true ' ---------------------------------------------------- ' Create the blank xml docs ' ---------------------------------------------------- Set objXML = Server.CreateObject("Msxml2.DOMDocument") Set objXSLT = Server.CreateObject("Msxml2.DOMDocument") objXML.async = false objXML.load server.mappath("file.xml") if objQuery.parseError.errorcode <> 0 then response.write "Impossible de charger file.xml. Cause: " & objXML.parseError.reason allok = false end if ' ---------------------------------------------------- ' Load the transform ' ---------------------------------------------------- if allok = true then objIDFiller.async = false objIDFiller.load server.mapPath("file.xslt") if objIDFiller.parseError.errorcode <> 0 then response.write "Impossible de charger file.xslt. Cause: " & objIDFiller.parseError.reason allok = false end if end if ' ---------------------------------------------------- ' Apply the transform ' ---------------------------------------------------- if allok = true then response.write objXML.transformNode objXSLT end if %>
13 juil. 2007 à 13:18
Voilà just pour dire que pour moi aussi quelques explications aurais était les bien venues
+ +
_`
/ \
21 mars 2006 à 14:35
...Une fois de plus.
16 févr. 2006 à 14:20
MERCI..........
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.