aus XML-String lesen

Fireball1982

Mitglied
Hallo,
ich versuche gerade aus einem XML-String einen Text auszulesen, der String sieht ca. so aus:

bla bla bla<VALUE TEXT="XXXXXX" UNITLIM="1">12345567</VALUE>

und ich versuche jetzt die X auszulesen. Bisher hab ich es mit Mustererkennung versucht.
mein Code sieht bisher so aus: (Funktion bekommt auszulesenden XMLString übergeben)

Dim eingabe As Char()
Dim text(100) As Char
Dim i, textstart, textende As Integer
eingabe = xmlstring.ToCharArray
For i = 0 To eingabe.Length - 2
If eingabe(i) = "X" And eingabe(i + 1) = "T" And eingabe(i + 2) = "=" Then
textstart = i + 4
End If
If eingabe(i) = "I" And eingabe(i + 1) = "T" And eingabe(i + 2) = "=" Then
textende = i - 4
End If
'TextBox3.Text = xmlstring + textstart + " " + textende
Next
For i = textstart To textende
text(i - textstart) = eingabe(i)
Next
ListBox2.Items.Add(text)

Aber irgendwie funktioniert das nicht, kann mir jemand sagen wo der Fehler liegt, oder gibt es vielleicht auch eine elegantere Lösung als diese
Danke
 
versuch mal

Code:
Dim oXmlDoc as new System.Xml.XmlDocument

oXmlDoc.LoadXml("<VALUE TEXT=""XXXXXX"" UNITLIM=""1"">12345567</VALUE>")

'gibt XXXXXXX zurück
MsgBox(oXmlDoc.DocumentElements(0).Attributes(0).InnerText)

Ich habe das jetzt einfach ausm Kopf gemacht, deswegen weiß ich nicht, ob es so auf Anhieb funktioniert. Vielleicht musst du noch Kleinigkeiten ändern. ;-]

Gruß, NRF
 

Neue Beiträge

Zurück