(AutoIt) Iterate over Direct Children with a Specific Tag

Demonstrates how to iterate over direct children having a specific tag.

The input XML, available at http://www.chilkatsoft.com/data/fruit.xml, is this:

<root>
    <fruit color="red">apple</fruit>
    <fruit color="green">pear</fruit>
    <veg color="orange">carrot</veg>
    <meat animal="cow">beef</meat>
    <xyz>
        <fruit color="blue">blueberry</fruit>
        <veg color="green">broccoli</veg>
    </xyz>
    <fruit color="purple">grape</fruit>
    <cheese color="yellow">cheddar</cheese>
</root>

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

$oXml = ObjCreate("Chilkat.Xml")
Local $oChild
Local $iNumWithTag
Local $i

Local $bSuccess
; The sample input XML is available at http://www.chilkatsoft.com/data/fruit.xml
$bSuccess = $oXml.LoadXmlFile("fruit.xml")
If ($bSuccess <> True) Then
    ConsoleWrite($oXml.LastErrorText & @CRLF)
    Exit
EndIf

;  Get the number of direct children having the tag "fruit"
$iNumWithTag = $oXml.NumChildrenHavingTag("fruit")

If ($iNumWithTag > 0) Then

    For $i = 0 To $iNumWithTag - 1
        $oChild = $oXml.GetNthChildWithTag("fruit",$i)
        ConsoleWrite($i & ": " & $oChild.Tag & " : " & $oChild.Content & @CRLF)

    Next
    ConsoleWrite("-----" & @CRLF)

    ; Do the same as the above loop, but instead of creating
    ; a new object instance for each child, call GetNthChildWithTag2 to
    ; update the object's reference instead.
    For $i = 0 To $iNumWithTag - 1
        ; Navigate to the Nth child.  
        $bSuccess = $oXml.GetNthChildWithTag2("fruit",$i)
        ConsoleWrite($i & ": " & $oXml.Tag & " : " & $oXml.Content & @CRLF)
        ; Navigate back up to the parent:
        $bSuccess = $oXml.GetParent2()
    Next
    ConsoleWrite("-----" & @CRLF)
EndIf