Modifier fichier XML par VB 6

Question

Bonjour &#224; tous,
SVP j'utilise VB 6 pour mettre &#224; jour des donn&#233;es d'un fichier XML !
voici le code:


Dim xmlFic As New MSXML2.DOMDocument
Dim nodeBook As IXMLDOMElement
 Set nodeBook = xmlFic .selectSingleNode(".//Ecole/Libr/Liv")
 nodeBook.setAttribute "Liv", "nom livre"


Mais ce code ne modifie pas du tout la valeur du noeud car apr&#232;s ouverture du fichier XML,la valeur est inchang&#233;e!
SVP o&#249; se trouve l'erreur?
merci

borntoclimb · Answer

Deux points á noter: 1. Je crois que "SetAttribute" n'est pas la fonction a utiliser. Si tu a un Tag "Liv" ou , ajouter un attribut te donnera Il faut modifier la valeur "Text" du Node pour arriver á Nom du Livre 2. Toutes les modifs faite dans VB restent en memoire et disparraisent quand tu quittes ton programme á moin de faire un "Save" Explicitement. Cela devrait te mettre sur la voie... A+ Borntoclimb ---No pasa nada...

lamiruth · Answer

Bonsoir Voici à peu pret le fichier xml (partiel) - - 2 test - 45 val rere - je souhaite par exemple modifier la valeur de riri :faire passer de 45 à 20

borntoclimb · Answer

xmlFic.getElementsByTagName("riri").item(0).text= "20"

Si tu as plusieurs element "riri", tu peux verifier que c'est bien l'Item X

For i = 0 To xmlFic.getElementsByTagName("riri").length - 1
     If   xmlFic.getElementsByTagName("riri").item(i).Attributes.getNamedItem("item").nodeValue="5" Then
            xmlFic.getElementsByTagName("riri").item(i).text= "20"
           Exit For
     End If
Next

Et voila...

Borntoclimb

---No pasa nada...

Modifier fichier XML par VB 6

3 réponses

Discussions similaires