Xojo Plugin
Xojo Plugin
XML Sort by Tag
See more XML Examples
Demonstrates the SortByTag method.The input XML, available at http://www.chilkatsoft.com/data/fruitSort1.xml, is this:
<root>
<fruits>
<apple>
<fuji>blah</fuji>
<gala>blah</gala>
<grannySmith>blah</grannySmith>
<honeycrisp>blah</honeycrisp>
<mcIntosh>blah</mcIntosh>
</apple>
<banana>blah</banana>
<blackberry>blah</blackberry>
<blueberry>blah</blueberry>
<orange>blah</orange>
<pear>blah</pear>
</fruits>
</root>
Chilkat Xojo Plugin Downloads
Dim success As Boolean
success = False
Dim xml As New Chilkat.Xml
Dim xSortRoot As Chilkat.Xml
// The sample input XML is available at http://www.chilkatsoft.com/data/fruitSort1.xml
success = xml.LoadXmlFile("fruitSort1.xml")
If (success <> True) Then
System.DebugLog(xml.LastErrorText)
Return
End If
// Sort the direct children under the "fruits" node by tag:
xSortRoot = xml.FindChild("fruits")
// Sort in ascending order.
Dim bAscending As Boolean
bAscending = True
xSortRoot.SortByTag bAscending
// Show the result:
System.DebugLog(xml.GetXml())
// <root>
// <fruits>
// <apple>
// <grannySmith>blah</grannySmith>
// <gala>blah</gala>
// <fuji>blah</fuji>
// <mcIntosh>blah</mcIntosh>
// <honeycrisp>blah</honeycrisp>
// </apple>
// <banana>blah</banana>
// <blackberry>blah</blackberry>
// <blueberry>blah</blueberry>
// <orange>blah</orange>
// <pear>blah</pear>
// </fruits>
// </root>
// Sort the direct children under the "apple" node:
success = xSortRoot.FindChild2("apple")
xSortRoot.SortByTag bAscending
System.DebugLog(xml.GetXml())
// <root>
// <fruits>
// <apple>
// <fuji>blah</fuji>
// <gala>blah</gala>
// <grannySmith>blah</grannySmith>
// <honeycrisp>blah</honeycrisp>
// <mcIntosh>blah</mcIntosh>
// </apple>
// <banana>blah</banana>
// <blackberry>blah</blackberry>
// <blueberry>blah</blueberry>
// <orange>blah</orange>
// <pear>blah</pear>
// </fruits>
// </root>