VB XML XSL et les parametres...
teebo
Messages postés
33585
Date d'inscription
Statut
Contributeur
Dernière intervention
-
teebo Messages postés 33585 Date d'inscription Statut Contributeur Dernière intervention -
teebo Messages postés 33585 Date d'inscription Statut Contributeur Dernière intervention -
Salut a tous, j'ai un joli fichier en XML qui est compose de plusieurs elements de meme nature (mais a l'interieur on sait a priori pas ce qu'il y a )
Genre
<appli>
<el id=1>
<string>kk chose
</string>
</el>
<el id=2>
<string>autre chose
</string>
<integer>10
<integer>
</el>
</appli>
Par exemple...et a partir de VB, je voudrais lancer un fichier XSL qui en lui passant en parametre l'identite de ce qu'il doit m'afficher...
Quelqu'un a une suggestion?
Merci
. .
\_/
Genre
<appli>
<el id=1>
<string>kk chose
</string>
</el>
<el id=2>
<string>autre chose
</string>
<integer>10
<integer>
</el>
</appli>
Par exemple...et a partir de VB, je voudrais lancer un fichier XSL qui en lui passant en parametre l'identite de ce qu'il doit m'afficher...
Quelqu'un a une suggestion?
Merci
. .
\_/
1 réponse
-
Il faut générer une feuille XSL du genre :
<xsl:stylesheet xmlns:xsl=" http://www.w3.org/1999/XSL/Transform" version=" 1.0">"
<xsl:output method='text'/>
<xsl:template match="/">
<xsl:value-of select="/appli/el[id='...']/string"/>
</xsl:template>
</xsl:stylesheet>
et la passer ensuite sur le document XML de départ
(utiliser MSXML pour ça)
en supposant que monXML contienne le contenu du fichier xml et monXSL la feuille de style générée, il faut faire :
dim doc as DOMDocument30
Set doc = New DOMDocument30
doc.loadXML monXML
Dim xslSheet As MSXML2.DOMDocument30
Set xslSheet = New MSXML2.DOMDocument30
xslSheet.loadXML monXSL
res = doc.transformNode(xslSheet)
dans la variable res il doit y avoir le texte correspondant à tout le contenu du tag string du tag el désiré.
