Discussion :

[Ashiteru]

Bonjour, je suis nouveau dans le xml et également sur le forum. Et je suis actuellement face à un problème.

L'application a pour but de recenser tout les dossiers et fichiers d'un chemin choisi et d'en liste les Dossier et Fichier.

Voici la structure de mon XML:

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
 
 
<DOSSIER>
 
    <NOM>    </NOM>
    <PATH>    </PATH>
 
     <FICHIER>
 
        <NOM>    </NOM>
        <URL>     </URL>
        <DATEMODIF>      </DATEMODIF>
        <EXTENSION>       </EXTENSION>
 
     </FICHIER>
 
</DOSSIER>

Et dans la condition ci-dessous, je créer mon nouveau fichier avec les informations corespondant, mais je n'arrive pas à ajouter elemFichier au noeud actuel.( Quand je fait noeud.appendChild, l'ajout est fait mais pas à l'endroit voulût )

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
21
22
23
24
25
26
27
28
29
30
 
   For Each noeud In element
 
                                For Each noeudEnf In noeud.ChildNodes
                                    lienFichier = fichier
 
 
                     If Dossier = lienFichier  Then
 
 
                                        elemFichier = XmlDoc.CreateElement("FICHIER")
                                        elemNomFichier = XmlDoc.CreateElement("NOM")
                                        elemURLFichier = XmlDoc.CreateElement("URL")
                                        elemDateModifFichier = XmlDoc.CreateElement("DATEMODIF")
                                        elemExtensionFichier = XmlDoc.CreateElement("EXTENSION")
 
                                        elemURLFichier.InnerText = fichier
                                        elemDateModifFichier.InnerText = ...
                                        elemExtensionFichier.InnerText = ...
                                        elemNomFichier.InnerText = ...
 
                                        elemFichier.AppendChild(elemNomFichier)
                                        elemFichier.AppendChild(elemURLFichier)
                                        elemFichier.AppendChild(elemDateModifFichier)
                                        noeud.AppendChild(elemExtensionFichier)
 
                                    End If
 
                                Next
                            Next

Coordialement, merci de votre aide

[Ashiteru]

C'est bon, après quelques jours de reflexion j'ai enfin trouvé la méthode appropriée.

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 nodeDeTest As XmlNodeList = XmlDoc.GetElementsByTagName("DOSSIER")
                                            Dim elementDeTest As XmlElement = nodeDeTest.Item(compteur - 1)
 
                                            elemFichier = XmlDoc.CreateElement("FICHIER")
                                            elemNomFichier = XmlDoc.CreateElement("NOM")
                                            elemURLFichier = XmlDoc.CreateElement("URL")
                                            elemDateModifFichier = XmlDoc.CreateElement("DATEMODIF")
                                            elemExtensionFichier = XmlDoc.CreateElement("EXTENSION")
 
                                            elemURLFichier.InnerText = fichier
                                            elemDateModifFichier.InnerText = Directory.GetLastWriteTime(fichier)
                                            elemExtensionFichier.InnerText = System.IO.Path.GetExtension(fichier)
                                            elemNomFichier.InnerText = ExtractFileName(fichier).Replace(elemExtensionFichier.InnerText, "")
 
                                            elemFichier.AppendChild(elemNomFichier)
                                            elemFichier.AppendChild(elemURLFichier)
                                            elemFichier.AppendChild(elemDateModifFichier)
                                            elemFichier.AppendChild(elemExtensionFichier)
                                            elementDeTest.AppendChild(elemFichier)

Ainsi grâce a GetElementByTagName() je retourne la liste de mes DOSSIER
et avec la seconde méthode Item() je retourne l'élement dans lequelle je souhaite ajouter mon fichier acutellement parcouru.