For Each entryu As XmlElement In docu.SelectNodes("data/entry")
 
            Dim id As String = entryu.Attributes.Item(0).Value
            Dim entry As XmlElement = doc.SelectSingleNode("data/entry[@id=" & _
              id & "]")
            ' doc updaten 
 
        Next

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist