Bonjour

voici la structure xml du fichier que je souhaite lire
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
<?xml version="1.0" encoding="ISO-8859-1"?>
<table>
<record num="1">
<nom_eleve>BENZAID</nom_eleve>
<prenom_eleve>Mehdi</prenom_eleve>
</record>
<record num="2">
<nom_eleve>COLLIGNON</nom_eleve>
<prenom_eleve>Bryan</prenom_eleve>
</record>
</table>
Je me suis un peut inspiré du tuto mais il y a un stress . Quelqu'un peut m'aider
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
  Dim XmlDoc As XmlDocument = New XmlDocument()
            XmlDoc.Load(TxtFichierXml.Text)
            Dim element As XmlNodeList
 
            element = XmlDoc.DocumentElement.GetElementsByTagName("record")
            Dim noeud, noeudEnf As XmlNode
 
 
            For Each noeud In element
                  For Each noeudEnf In noeud.ChildNodes
                        If noeudEnf.LocalName = "Nom_Eleve" Then
                              Nom = noeudEnf.InnerText
                        Else
                              If (noeudEnf.LocalName = "Prenom_Eleve") Then
                                    Prenom = noeudEnf.InnerText
                              End If
                        End If
                        MsgBox(Nom & " à " & Prenom)
                  Next
            Next