Accessing an XML Node's Attribute

Demonstrates how to access an XML node's attribute's value. In this example, we'll access the valud for the ISBN of the first book in the following XML document, which is located at http://www.chilkatsoft.com/testData/bookstore.xml

<?xml version="1.0" standalone="yes"?>
<bookstore>
   <book ISBN="10-000000-001">
...
</bookstore>

Download Chilkat XML ActiveX

Dim xml As New ChilkatXml

Dim success As Long

success = xml.LoadXmlFile("bookstore.xml")
If (success <> 1) Then
    MsgBox xml.LastErrorText
    Exit Sub
End If

'  Navigate to the 1st child (i.e. the "book" node)
xml.FirstChild2 

'  Now access the attribute:
Dim attrValue As String

attrValue = xml.GetAttrValue("ISBN")

Text1.Text = Text1.Text & attrValue & vbCrLf