(Visual Basic 6.0) XML GetChildWithAttr

Demonstrates how to get the content of a particular node with a particular attribute. For example, returns "Face up in the Rain" for the Name="Album" node.

 <Response Status="OK">
   <Item Name="ZoneID">0</Item>
   <Item Name="State">2</Item>
   <Item Name="FileKey">305718</Item>
   <Item Name="Artist">Michael Tomlinson</Item>
   <Item Name="Album">Face Up in the Rain</Item>
   <Item Name="Name">The Way We're Going</Item>
   <Item Name="Status">Playing</Item>
</Response> 

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Dim xml As New ChilkatXml

Dim success As Long
success = xml.LoadXmlFile("qa_data/resp.xml")
If (success <> 1) Then
    Debug.Print xml.LastErrorText
    Exit Sub
End If

Dim xItem As ChilkatXml
Set xItem = xml.GetChildWithAttr("Item","Name","Album")
If (xml.LastMethodSuccess = 0) Then
    Debug.Print "not found."
    Exit Sub
End If

Debug.Print xItem.Content