Ajouter une valeur dans un fichier XML

Ajout d'un texte à la fin pour la balise <commentaire>

<commande>
  <numero>105</numero>
  <lignecommande numero="105">
     <ref>AOO4-1-15</ref>
     <libelle>Clé USB OpenOffice</libelle>
  </lignecommande>
  <reglement>true</reglement>
  <commentaire>Tout est bien</commentaire>
</commande>

Sub Main
	GlobalScope.BasicLibraries.loadLibrary ("zBasic")

	sFic = "c:\temp\commande.xml"
	oXML = zXML.Ouvre(sFic)
	oXML = zXML.ModifValeur(oXML, "commentaire", " qui finit bien", 1, 1)
	zXML.Sauve(sFic, oXML)
End Sub

Ce qui donnera

<commande>
  <numero>105</numero>
  <lignecommande numero="105">
     <ref>AOO4-1-15</ref>
     <libelle>Clé USB OpenOffice</libelle>
  </lignecommande>
  <reglement>true</reglement>
  <commentaire>Tout est bien qui finit bien</commentaire>
</commande>