XML Parsing Example: Currency Data

Simple example showing how to parse an XML file containing currency data.

Download Chilkat .NET for 2.0 Framework

Download Chilkat .NET for 1.0 / 1.1 Framework

Dim xml0 As New Chilkat.Xml()
Dim xml As Chilkat.Xml

'  The Chilkat XML component is freeware.

'  Load an XML document.  Typically you might call LoadXml
'  to load an XML file.  This example loads an XML file from
'  a URL:
xml = xml0.HttpGet("http://www.chilkatsoft.com/testData/currency.xml")

'  Iterate over each "CURRENCY" child node and display the contents:
Dim curr As Chilkat.Xml
Dim n As Long
Dim i As Long
n = xml.NumChildrenHavingTag("CURRENCY")
For i = 0 To n - 1
    curr = xml.GetNthChildWithTag("CURRENCY",i)
    TextBox1.Text = TextBox1.Text & "----" & vbCrLf
    TextBox1.Refresh()
    TextBox1.Text = TextBox1.Text & "Name: " & curr.GetChildContent("NAME") & vbCrLf
    TextBox1.Refresh()
    TextBox1.Text = TextBox1.Text & "Code: " & curr.GetChildContent("CURRENCYCODE") & vbCrLf
    TextBox1.Refresh()
    TextBox1.Text = TextBox1.Text & "Country: " & curr.GetChildContent("COUNTRY") & vbCrLf
    TextBox1.Refresh()

Next