Récuperer données xml [Résolu]

Messages postés
189
Date d'inscription
mercredi 24 novembre 2004
Statut
Membre
Dernière intervention
15 mai 2013
- - Dernière réponse : waspy59
Messages postés
189
Date d'inscription
mercredi 24 novembre 2004
Statut
Membre
Dernière intervention
15 mai 2013
- 24 oct. 2007 à 13:54
Bonjour,

J'ai un fichier xml avec la strucutre suivante:

<DONNEES>
         
                     <NomLog>ProjetCB</NomLog>
                    <language>french</language>
                    xxxxxxx
                    yyyyy
        
        
                   
                                 <Shortname>Truc1</Shortname>
                                 <Code1>111</Code1>
                                 <Code2>222</Code2>
                   

                   

                                 <Shortname>bidule2</Shortname>

                                 <Code1>111</Code1>

                                 <Code2>222</Code2>

                   

       

</DONNEES>

Le nombre de Balises pouvant aller de 0 à .....
Je souhaite recuperer dans une listebox le NOM de chaque PARAMETRE (si présent). J'ai fait plusieurs essais en vain (xpath...)
Si quelqu'un peut me mettre sur la voie avec un exemple... merci

ps: quand j'aurai la liste des NOM des PARAMETRE dans la listbox, je souhaite afficher dans des textbox les valeurs des noeuds fils des noeuds PARAMETRE.

Mais debutant enVB.net. et xml, j'éprouve quelque difficultés que les tuto et exemple glanés ca et là n'ont sus effacer...

A l'avance merci
Afficher la suite 

1 réponse

Meilleure réponse
Messages postés
189
Date d'inscription
mercredi 24 novembre 2004
Statut
Membre
Dernière intervention
15 mai 2013
3
Merci
J'ai trouvé.... je met le code cela peut servir a quelqu'un:

 Dim elementRecord As XmlNodeList
        Dim noeudCl As XmlNode
        elementRecord = xmlDoc.DocumentElement.GetElementsByTagName("PARAMETRE")
        For Each noeudCl In elementRecord
            If noeudCl.LocalName = "PARAMETRE" Then
                ListParametre.Items.Add(noeudCl.Attributes("NOM").Value)
            End If
        Next

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 222 internautes nous ont dit merci ce mois-ci

Commenter la réponse de waspy59