(DataFlex) Demonstrate the XML UpdateAttrAt Method

Demonstrates the XML UpdateAttrAt method to update attribute name/value pairs in XML.

Note: This example requires Chilkat v9.5.0.64 or later.

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoXml
    Boolean iAutoCreate
    Boolean iSuccess
    String sTemp1

    // Note: This example requires Chilkat v9.5.0.64 or later.
    Get Create (RefClass(cComChilkatXml)) To hoXml
    If (Not(IsComObjectCreated(hoXml))) Begin
        Send CreateComObject of hoXml
    End

    Set ComTag Of hoXml To "animals"

    Move True To iAutoCreate

    // When the autoCreate argument equals True, the UpdateAttrAt
    // method auto-creates the children as needed:
    Get ComUpdateAttrAt Of hoXml "penguin" iAutoCreate "feature" "flightless bird" To iSuccess
    Get ComUpdateAttrAt Of hoXml "mammal|rodent|squirrel" iAutoCreate "feature" "bushy tail" To iSuccess
    Get ComUpdateAttrAt Of hoXml "mammal|rodent|rat" iAutoCreate "feature" "long hairless tail" To iSuccess

    // Show the XML
    Get ComGetXml Of hoXml To sTemp1
    Showln sTemp1

    // 	<?xml version="1.0" encoding="utf-8" ?>
    // 	<animals>
    // 	    <penguin feature="flightless bird" />
    // 	    <mammal>
    // 	        <rodent>
    // 	            <squirrel feature="bushy tail" />
    // 	            <rat feature="long hairless tail" />
    // 	        </rodent>
    // 	    </mammal>
    // 	</animals>
    // 

    // Now update each node's "feature" attribute..
    Get ComUpdateAttrAt Of hoXml "penguin" iAutoCreate "feature" "black and white" To iSuccess
    Get ComUpdateAttrAt Of hoXml "mammal|rodent|squirrel" iAutoCreate "feature" "grey, red, or black" To iSuccess
    Get ComUpdateAttrAt Of hoXml "mammal|rodent|rat" iAutoCreate "feature" "brown, grey, white, or black" To iSuccess

    Get ComGetXml Of hoXml To sTemp1
    Showln sTemp1

    // 	<?xml version="1.0" encoding="utf-8" ?>
    // 	<animals>
    // 	    <penguin feature="black and white" />
    // 	    <mammal>
    // 	        <rodent>
    // 	            <squirrel feature="grey, red, or black" />
    // 	            <rat feature="brown, grey, white, or black" />
    // 	        </rodent>
    // 	    </mammal>
    // 	</animals>
    // 


End_Procedure