avoir un fichier xml comme ceci.Ma fonction récursive ne fonctionne pas correctement
<?xml version ="1.0" encoding ="utf-8"?>
<menu>
<menuNode title="Register" value="true">
<menuNode title="Company" value="false">
<menuNode title="Add" value="false" />
<menuNode title="Modify" value="false" />
<menuNode title="Delete" value="false" />
</menuNode>
<menuNode title="SubCategory" value="true">
<menuNode title="Add" value="false" />
<menuNode title="Modify" value="false" />
<menuNode title="Delete" value="false" />
</menuNode>
<menuNode>
</menu>
Je veux supprimer tous les nœuds avec valeur = false j'ai écrit une fonction récursive comme celui-ci, mais sa ne fonctionne pas prooperly.
Public Sub RemoveValueFalseNodes(ByVal MyMenuSource As XElement)
For Each myMenuNode In MyMenuSource.Elements
If myMenuNode.Elements.Count > 0 Then
RemoveValueFalseNodes(myMenuNode)
End If
If myMenuNode.Attribute("value").Value = "false" Then
myMenuNode.Remove()
End If
Next
End Sub
Ne me ressemble pas à un fichier XML valide. – Shoban
À droite, fermez la dernière balise "menuNode". – AndiDog