AutoIt

AddAttribute - Insert New Attribute in an XML Node

Demonstrates adding an name=value attribute to an XML element.

This example uses the XML sample file here: sample1.xml. The sample1.xml file contains this content:

AutoIt

Local $bSuccess = False

$oXml = ObjCreate("Chilkat.Xml")

$bSuccess = $oXml.LoadXmlFile("qa_data/xml/sample1.xml")
If ($bSuccess <> True) Then
    ConsoleWrite($oXml.LastErrorText & @CRLF)
    Exit
EndIf

; Navigate to the "books" element:
Local $bFound = $oXml.FindChild2("books")
If ($bFound = False) Then
    ConsoleWrite("No books child found!" & @CRLF)
    Exit
EndIf

Local $iNumChildren = $oXml.NumChildren

Local $i = 0
While $i < $iNumChildren

    ; Navigate to the Nth book 
    $oXml.GetChild2($i)

    ; Display the book title:
    ConsoleWrite($oXml.GetAttrValue("title") & @CRLF)

    ; Add a new integer attribute:
    ; Should never fail..
    $oXml.AddAttributeInt("bookId",$i)

    ; Add a new unread="yes" attribute:
    $oXml.AddAttribute("unread","yes")

    ; Navigate back up to the parent:
    $oXml.GetParent2()

    $i = $i + 1
Wend

; Navigate back to the document root:
$oXml.GetRoot2 

; Save the updated document:
$bSuccess = $oXml.SaveXml("modified.xml")
If ($bSuccess <> True) Then
    ConsoleWrite($oXml.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite($oXml.GetXml() & @CRLF)