B4X
B4X
XML Sort Records by Content
See more XML Examples
Demonstrates the SortRecordsByContent method.The input XML, available at http://www.chilkatsoft.com/data/fruitRecordsSort.xml, is this:
<root>
<fruits>
<fruit>
<name>apple</name>
<color>red</color>
</fruit>
<fruit>
<name>banana</name>
<color>yellow</color>
</fruit>
<fruit>
<name>blackberry</name>
<color>purple</color>
</fruit>
<fruit>
<name>blueberry</name>
<color>blue</color>
</fruit>
<fruit>
<name>orange</name>
<color>orange</color>
</fruit>
<fruit>
<name>pear</name>
<color>green</color>
</fruit>
</fruits>
</root>
Chilkat B4X Downloads
Dim success As Boolean = False
Dim xml As ChilkatXml
xml.Initialize
Dim xSortRoot As ChilkatXml
' The sample input XML is available at http://www.chilkatsoft.com/data/fruitRecordsSort.xml
success = xml.LoadXmlFile("fruitRecordsSort.xml")
If success <> True Then
Log(xml.LastErrorText)
Return
End If
' The "fruit" records are direct children of the "fruits" node.
' Therefore, to sort the fruit records, the SortRecordsByContent
' method must be called from the "fruits" node.
xSortRoot = xml.FindChild("fruits")
' Sort by the "name" field in ascending order.
Dim bAscending As Boolean = True
xSortRoot.SortRecordsByContent("name", bAscending)
' Show the result:
Log(xml.GetXml)
' <root>
' <fruits>
' <fruit>
' <name>apple</name>
' <color>red</color>
' </fruit>
' <fruit>
' <name>banana</name>
' <color>yellow</color>
' </fruit>
' <fruit>
' <name>blackberry</name>
' <color>purple</color>
' </fruit>
' <fruit>
' <name>blueberry</name>
' <color>blue</color>
' </fruit>
' <fruit>
' <name>orange</name>
' <color>orange</color>
' </fruit>
' <fruit>
' <name>pear</name>
' <color>green</color>
' </fruit>
' </fruits>
' </root>