[RESOLVED] Read XML

[T120]

 <way id='27004700' >
    <nd ref='296002937' />
    <nd ref='296003910' />
    <nd ref='296003911' />
    <nd ref='296003912' />
    <nd ref='296003913' />
    <nd ref='296003914' />
    <nd ref='296003916' />
      <tag k='wires' v='single' />
    <tag k='cables' v='3' />
    <tag k='power' v='line' />
  </way>

I'm reading an XML file using a XmlTextReader:-

  Dim strDir As String = "d:\map.osm"
            Dim xReader As XmlTextReader = New XmlTextReader(strDir)

           Do While xReader.Read()

            Select Case xReader.Name

               case "way"

How do I read all the nd refs and tags for the way?

[.paul.]

you can read your xml with LINQ:

Dim xml As XDocument = XDocument.Parse(IO.File.ReadAllText("xml3.txt"))
Dim values = (From item In xml...<way> _
              Select New With { _
              .id = item.Attribute("id").Value, _
              .refs = (From a In item...<nd>.Attributes("ref") _
                      Select a.Value).ToArray, _
              .k = (From a In item...<tag>.Attributes("k") _
                      Select a.Value).ToArray, _
              .v = (From a In item...<tag>.Attributes("v") _
                      Select a.Value).ToArray}).ToList
 
For Each v In values
    Debug.Print(v.id & Environment.NewLine & String.Join(",", v.refs) & Environment.NewLine & String.Join(",", v.k) & Environment.NewLine & String.Join(",", v.v) & Environment.NewLine)
Next

[T120]

Great - that did it thanks very much