Xojo Plugin

Find XML Element where Attribute = Value

See more XML Examples

Finds an XML element at a particular location where an attribute has a specified value. Xojo Plugin

Dim success As Boolean
success = False

// We have the following XML and wish to find the value of the time attribute where msg = "alert-from".

// <cdr id="4e5d3e7f41bf6201ad81000c29703270" e164="6207">
//     <user>
//         <grp name="wfln" mode="active"/>
//     </user>
//     <event msg="setup-to" time="287069" e164="5034"/>
//     <event msg="alert-from" time="287069" e164="5034"/>
//     <event msg="rel-to" time="287079" e164="5034"/>
// </cdr>

// First, build the above XML:

Dim xml As New Chilkat.Xml
xml.Tag = "cdr"
success = xml.AddAttribute("id","4e5d3e7f41bf6201ad81000c29703270")
success = xml.AddAttribute("e164","6207")
success = xml.UpdateAttrAt("user|grp",True,"name","wfln")
success = xml.UpdateAttrAt("user|grp",True,"mode","active")
success = xml.UpdateAttrAt("event",True,"msg","setup-to")
success = xml.UpdateAttrAt("event",True,"time","287069")
success = xml.UpdateAttrAt("event",True,"e164","5034")
success = xml.UpdateAttrAt("event[1]",True,"msg","alert-from")
success = xml.UpdateAttrAt("event[1]",True,"time","287069")
success = xml.UpdateAttrAt("event[1]",True,"e164","5034")
success = xml.UpdateAttrAt("event[2]",True,"msg","rel-to")
success = xml.UpdateAttrAt("event[2]",True,"time","287079")
success = xml.UpdateAttrAt("event[2]",True,"e164","5034")

// Show that we have the above XML
System.DebugLog(xml.GetXml())

// Find the element where msg = "alert-from"
// This updates the xml object's reference to the found element (if successful).
Dim notUsed As String
notUsed = xml.ChilkatPath("/A/event,msg,alert-from|$")
If (xml.LastMethodSuccess = False) Then
    System.DebugLog("Not found.")
    Return
End If

// Get the value of the "time" attribute.
System.DebugLog("time = " + xml.GetAttrValue("time"))

// Restore the xml object's internal reference to the root of the XML document
xml.GetRoot2