Modifier valeur attribut XML
Bonjour,
Je suis en train de réaliser un petit logiciel qui doit modifier une valeur dans un fichier XML comme ci-dessous.
<resultat credit_impot_restituable="903" revenu_reference="8792"> <credit_impot ppe="871" gene="32"/> </resultat>
Comment faire pour modifier la valeur de "revenu reference" actuellement égale à 8792 ??
Pour l'instant j'arrive à lire la valeur grâce au code ci-dessous mais je n'arrive pas à la remplacer dans le fichier.
Code:
1
2
3
4
5
6
7
8
9
| Dim root As XElement = XElement.Load("F:\000741\IMP10\resultats.xml")
Dim Param As IEnumerable(Of XElement) = _
From elem In root...<resultat> _
Select elem
' recherche d'un attribut "revenu_reference" dans un marqueur "resultat"
For Each elem As XElement In Param
MsgBox("Le crédit d'impôt est de " & (elem.@credit_impot_restituable))
MsgBox("Le revenu de référence est de " & (elem.@revenu_reference))
Next |
Merci de votre Aide
