Waarschijnlijk heel makkelijk, maar mij nog niet gelukt.
Ik wil de naam van het element hebben (in dit geval "info")
Geprobeerd met "debug.print (reader.name)", maar dan krijg ik een lege string waarde
Ik heb dit nodig om een onderscheid te kunnen maken (select case) tussen verschillende XML strings die ik binnen krijg met verschillende elementen via RS232
bv
"<info name=""John"" age=""9"" />"
"<stats gold=""3"" sliver=""9"" />"
Ik wil de naam van het element hebben (in dit geval "info")
Geprobeerd met "debug.print (reader.name)", maar dan krijg ik een lege string waarde
Ik heb dit nodig om een onderscheid te kunnen maken (select case) tussen verschillende XML strings die ik binnen krijg met verschillende elementen via RS232
bv
"<info name=""John"" age=""9"" />"
"<stats gold=""3"" sliver=""9"" />"
Code:
Dim xmlString As String = "<info name=""John"" age=""9"" />"
Using reader As XmlReader = XmlReader.Create(New StringReader(xmlString))
debug.print (reader.name) ' dit werkt dus niet
reader.ReadToFollowing("info")
reader.MoveToFirstAttribute()
Dim id As String = reader.Value
TextBox1.Text = "Name: " + id
reader.MoveToNextAttribute()
Dim age As String = reader.Value
TextBox2.Text = "age: " + age
End Using