Xojo Plugin

SearchAllForContent

See more XML Examples

Demonstrates the SearchAllForContent method. Xojo Plugin

Dim success As Boolean
success = False

Dim xml As New Chilkat.Xml
Dim xBeginAfter As Chilkat.Xml
Dim xFound As Chilkat.Xml

success = xml.LoadXmlFile("qa_data/xml/pigs.xml")
If (success <> True) Then
    System.DebugLog(xml.LastErrorText)
    Return
End If

xBeginAfter = xml.GetSelf()
xFound = xml.SearchAllForContent(xBeginAfter,"*pig*")
Dim searchForMore As Boolean
searchForMore = True
While (searchForMore = True)

    System.DebugLog(xFound.Tag)
    System.DebugLog(xFound.Content)
    System.DebugLog("--")

    xBeginAfter = xFound
    xFound = xml.SearchAllForContent(xBeginAfter,"*pig*")

    searchForMore = xml.LastMethodSuccess
Wend