Nieuw in VB.net / XML

[Kiterme]

Ik ben bezig om een programma te maken waarbij ik xml data opvraag van een server.
De XML data strings krijg ik binnen, maar nu moet ik dat filteren.

I krijg 2 XML data strings:
< status time="16:30:30" fasttime="50:35" \>
< info ID="54365" name="John" laptime="55:58" passtrhoughtime="16:25:59" \>

Nu wil ik het volgende filteren:
status, info en de waardes die tussen de " " staan.

Wie kan mij hier bij helpen?

 

[edmoor]

Dat kun je doen met de Instr functie:
http://msdn.microsoft.com/en-us/library/8460tsh1(v=vs.90).aspx

En de Mid functie:
http://msdn.microsoft.com/en-us/library/05e63829(v=vs.90).aspx

 

[Kiterme]

Hi Edmoor,

Bedankt voor je snelle reactie!

Aan deze oplossing zat ik ook al te denken, maar had gehoopt met de komst van XML het anders/eenvoudiger zou kunnen.

 

[edmoor]

Dat kan wel maar dan moet je denk ik de hele XML structuur hebben omdat de functie ervoor de tabellen, velden en eigenschappen moet kunnen onderscheiden.

 

[Bloodshed]

Je kunt ook zoiets doen, aanroepen bij naam of door alle attributes heen lopen:


Voorbeeld Code:
[CPP] Dim xml = New XmlDocument()
xml.InnerXml = "<status time=""16:30:30"" fasttime=""50:35"" />"

Dim statusNode = xml("status")
If statusNode IsNot Nothing AndAlso statusNode.HasAttributes Then
Console.WriteLine("status")
Console.WriteLine("time: {0}", statusNode.Attributes("time").Value)
Console.WriteLine("fasttime: {0}", statusNode.Attributes("fasttime").Value)
End If



xml.InnerXml = "<info ID=""54365"" name=""John"" laptime=""55:58"" passtrhoughtime=""16:25:59"" />"

Dim infoNode = xml("info")
If infoNode IsNot Nothing AndAlso infoNode.HasAttributes Then
Console.WriteLine("info")
For Each attribute As XmlAttribute In infoNode.Attributes
Console.WriteLine("{0}: {1}", attribute.Name, attribute.Value)
Next
End If


Console.Read()
[/CPP]


code onder voorbehoud (van C# naar VB converted)

 

[Kiterme]

Bloodshed,

Bedankt voor je reactie. Ik zal dit weekend eens mee spelen.