XML Parsing Example: Currency Data

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

LOCAL loXml0
LOCAL loXml
LOCAL loCurr
LOCAL n
LOCAL i

loXml0 = CreateObject('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:
loXml = loXml0.HttpGet("http://www.chilkatsoft.com/testData/currency.xml")

*  Iterate over each "CURRENCY" child node and display the contents:

n = loXml.NumChildrenHavingTag("CURRENCY")
FOR i = 0 TO n - 1
    loCurr = loXml.GetNthChildWithTag("CURRENCY",i)
    ? "----"
    ? "Name: " + loCurr.GetChildContent("NAME")
    ? "Code: " + loCurr.GetChildContent("CURRENCYCODE")
    ? "Country: " + loCurr.GetChildContent("COUNTRY")
    RELEASE loCurr
NEXT

RELEASE loXml