Visual FoxPro

Xml.UpdateAttrAt Example #2

Another Xml.UpdateAttrAt example... Visual FoxPro

LOCAL loXml
LOCAL loSbValue
LOCAL i

loXml = CreateObject('Chilkat.Xml')
loXml.Tag = "abc"

loSbValue = CreateObject('Chilkat.StringBuilder')

i = 0
DO WHILE i < 10
    loXml.I = i
    loSbValue.Clear()
    loSbValue.AppendInt(i)
    loXml.UpdateAttrAt("xyz|test[i]",1,"index",loSbValue.GetAsString())
    i = i + 1
ENDDO

? loXml.GetXml()

* Output is:

* 	<?xml version="1.0" encoding="utf-8" ?>
* 	<abc>
* 	    <xyz>
* 	        <test index="0" />
* 	        <test index="1" />
* 	        <test index="2" />
* 	        <test index="3" />
* 	        <test index="4" />
* 	        <test index="5" />
* 	        <test index="6" />
* 	        <test index="7" />
* 	        <test index="8" />
* 	        <test index="9" />
* 	    </xyz>
* 	</abc>

RELEASE loXml
RELEASE loSbValue