PowerBuilder

SearchAllForContent

See more XML Examples

Demonstrates the SearchAllForContent method. PowerBuilder

integer li_rc
integer li_Success
oleobject loo_Xml
oleobject loo_XBeginAfter
oleobject loo_XFound
integer li_SearchForMore

li_Success = 0

loo_Xml = create oleobject
li_rc = loo_Xml.ConnectToNewObject("Chilkat.Xml")
if li_rc < 0 then
    destroy loo_Xml
    MessageBox("Error","Connecting to COM object failed")
    return
end if

li_Success = loo_Xml.LoadXmlFile("qa_data/xml/pigs.xml")
if li_Success <> 1 then
    Write-Debug loo_Xml.LastErrorText
    destroy loo_Xml
    return
end if

loo_XBeginAfter = loo_Xml.GetSelf()
loo_XFound = loo_Xml.SearchAllForContent(loo_XBeginAfter,"*pig*")
li_SearchForMore = 1
do while (li_SearchForMore = 1)

    Write-Debug loo_XFound.Tag
    Write-Debug loo_XFound.Content
    Write-Debug "--"

    destroy loo_XBeginAfter
    loo_XBeginAfter = loo_XFound
    loo_XFound = loo_Xml.SearchAllForContent(loo_XBeginAfter,"*pig*")

    li_SearchForMore = loo_Xml.LastMethodSuccess
loop

destroy loo_XBeginAfter


destroy loo_Xml