Je souhaiterais quand il rencontre "NameComputer3" qu'il efface la ligne ...
je pourrais utiliser un StreamReader, je trouve que ne ça fait pas propre !
:)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Millox Frédéric
Bonjour,
Essaye ça :
Dim xDoc As Xml.XmlDocument Dim xNode, xNodeCurrent As Xml.XmlNode
xDoc = New Xml.XmlDocument xDoc.Load("C:TempTest.xml")
xNodeCurrent = xDoc.SelectSingleNode("computerStatus") For Each xNode In xNodeCurrent.ChildNodes If xNode.Attributes("computerName").InnerText.Equals("NameComputer3")Then xNodeCurrent.RemoveChild(xNode) Next
Je souhaiterais quand il rencontre "NameComputer3" qu'il efface la ligne ... je pourrais utiliser un StreamReader, je trouve que ne ça fait pas propre ! :)
Merci de votre aide
Cordialement
Bonjour,
Essaye ça :
Dim xDoc As Xml.XmlDocument
Dim xNode, xNodeCurrent As Xml.XmlNode
xDoc = New Xml.XmlDocument
xDoc.Load("C:TempTest.xml")
xNodeCurrent = xDoc.SelectSingleNode("computerStatus")
For Each xNode In xNodeCurrent.ChildNodes
If
xNode.Attributes("computerName").InnerText.Equals("NameComputer3")Then
xNodeCurrent.RemoveChild(xNode)
Next
Je souhaiterais quand il rencontre "NameComputer3" qu'il efface la ligne ...
je pourrais utiliser un StreamReader, je trouve que ne ça fait pas propre !
:)
Dim xDoc As Xml.XmlDocument Dim xNode, xNodeCurrent As Xml.XmlNode
xDoc = New Xml.XmlDocument xDoc.Load("C:TempTest.xml")
xNodeCurrent = xDoc.SelectSingleNode("computerStatus") For Each xNode In xNodeCurrent.ChildNodes If xNode.Attributes("computerName").InnerText.Equals("NameComputer3")Then xNodeCurrent.RemoveChild(xNode) Next
Je souhaiterais quand il rencontre "NameComputer3" qu'il efface la ligne ... je pourrais utiliser un StreamReader, je trouve que ne ça fait pas propre ! :)
Merci de votre aide
Cordialement
TroXsA
Merci beaucoup
Le code que tu m'as donné plantais a If xNode.Attributes("computerName").InnerText.Equals("NameComputer3")
j'ai repris le code que j'avais fait et j'ai fais un remove au lieu de RemoveNode et ça fonctionne tres bien comme ça !
Merci encore
Merci beaucoup
Le code que tu m'as donné plantais a If
xNode.Attributes("computerName").InnerText.Equals("NameComputer3")
j'ai repris le code que j'avais fait et j'ai fais un remove au lieu de
RemoveNode et ça fonctionne tres bien comme ça !