Hi experts

Im reading some exchange rates in xml but im haveing trouble picking out data in the node where i read Currency names ("desc") :confused:

hope somebody got a clue.....?

Function Getdata() As ICollection

Dim reader As XmlTextReader = New XmlTextReader("http://www.nationalbanken.dk/dndk/valuta.nsf/valuta.xml")

Dim objNode_desc As String
Dim objNode_rate As String
Dim objNode_rowcount As Integer
Dim i As Integer

Dim dtbl As New DataTable
Dim dr As DataRow
Dim dv As New DataView(dtbl)

Dim objNodes As New XmlDocument
objNodes.Load(reader)
Dim oNodes As XmlNodeList
oNodes = objNodes.SelectNodes("//currency")

objNode_rowcount = oNodes.Count - 1

dtbl.Columns.Add(New DataColumn("StringValue", GetType(String)))

dtbl.Columns.Add(New DataColumn("CurrencyValue", GetType(Double)))

For i = 0 To objNode_rowcount

dr = dtbl.NewRow()
objNode_desc = Val(oNodes(i).Attributes.GetNamedItem("desc").Value)' ------THIS DATA IN THE NODE_SET... I CANT READ FROM XML SOURCE
objNode_rate = Val(oNodes(i).Attributes.GetNamedItem("rate").Value)

dr(0) = objNode_desc
dr(1) = objNode_rate
dtbl.Rows.Add(dr)
Next i

dgvalutakurser.DataSource = dv
dgvalutakurser.DataBind()

End Function

rgds