VBScript Trouver un nœud dans un nœud XML et remplacer la valeur

Question

Comment écrire un vbscript qui devrait rechercher un nœud spécifique dans un fichier XML et remplacer la valeur de ce nœud par une autre valeur? Jusqu'à présent, je peux lire un nœud et obtenir la valeur. Veuillez me suggérer un exemple qui devrait lire un nœud spécifique dans le fichier xml et remplacer la valeur de ce nœud.

Answer 1

Voici un exemple d'édition et de sauvegarde XML simple dans VBScript. Je recommande d'utiliser Xpath pour sélectionner votre nœud au lieu de boucler sur les nœuds enfants, vous pouvez fournir votre XML pour une réponse plus détaillée.

Set xmlDoc = CreateObject("Microsoft.XMLDOM") 
xmlDoc.load "MYFILE.xml" 

'Locate the desired node 
'Note the use of XPATH instead of looping over all the child nodes 
Set nNode = xmlDoc.selectsinglenode ("//parentnode/targetnode") 

'Set the node text with the new value 
nNode.text = "NEW VALUE" 

'Save the xml document with the new settings. 
strResult = xmldoc.save("MYFILE.xml")