Hallo Zusammen,
ich bräuchte gerade etwas Hilfe, da ich zur Zeit total auf dem Schlauch stehe.
Ich habe für einen kleinen Streamplayer eine XML-Datei gebastelt:
Da ich in meinem Tool eine Möglichkeit der Verwaltung haben will habe ich schon eine Funktion fürs Ändern geschrieben, da ich mich nun an die Löschen-Funktion machen wollte habe ich soweit etwas gebastelt:
Nun besteht mein Problem, das nach dem Löschen noch die äußeren Tags (<stream></stream>) überbleiben, ist ja auch soweit Richtig. Nur ich habe gerade keine Idee wie ich diese leeren Tags wieder weg bekomme.
Für einen Schubs in die richtige Richtung wäre ich erfreut![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
Gruß,
homekiller
ich bräuchte gerade etwas Hilfe, da ich zur Zeit total auf dem Schlauch stehe.
Ich habe für einen kleinen Streamplayer eine XML-Datei gebastelt:
XML-Quellcode
- <?xml version="1.0" encoding="utf-8"?>
- <streams>
- <stream>
- <name>Technobase.fm</name>
- <url>http://listen.technobase.fm/dsl.asx</url>
- </stream>
- <stream>
- <name>Housetime.fm</name>
- <url>http://listen.housetime.fm/dsl.asx</url>
- </stream>
- <stream>
- <name>Hardbase.fm</name>
- <url>http://listen.hardbase.fm/dsl.asx</url>
- </stream>
- <stream>
- <name>Coretime.fm</name>
- <url>http://listen.coretime.fm/dsl.asx</url>
- </stream>
- <stream>
- </stream>
- </streams>
Da ich in meinem Tool eine Möglichkeit der Verwaltung haben will habe ich schon eine Funktion fürs Ändern geschrieben, da ich mich nun an die Löschen-Funktion machen wollte habe ich soweit etwas gebastelt:
VB.NET-Quellcode
- 'Erstellen des XMLDocument Objektes und laden einer XML-Datei
- Dim xmlDoc As New Xml.XmlDocument
- xmlDoc.Load(XmlDateiPfad)
- 'Erstellen einer Liste mit allen Elementen die Stream heißen
- Dim Nodelist As Xml.XmlNodeList = xmlDoc.GetElementsByTagName("stream")
- 'Durchlaufe alle Punkte die in der Liste stehen
- For Each Node In Nodelist
- 'Erstellen der Ausgabevariale und zuweisen des jeweiligen Punktes aus der Liste
- Dim Ausgabe As Xml.XmlNode
- Ausgabe = Node
- If (Ausgabe.Item("name").InnerText = deleteName) Then
- Ausgabe.RemoveAll()
- End If
- Next
- xmlDoc.Save(XmlDateiPfad)
Nun besteht mein Problem, das nach dem Löschen noch die äußeren Tags (<stream></stream>) überbleiben, ist ja auch soweit Richtig. Nur ich habe gerade keine Idee wie ich diese leeren Tags wieder weg bekomme.
Für einen Schubs in die richtige Richtung wäre ich erfreut
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
Gruß,
homekiller
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „homekiller“ ()