This should get you started
Dim oXML, oClientNode, iClientAge
Set oXML = Createobject("MSXML2.DOMDocument.4.0")
oXML.Load(PATH_TO_FILE_ON_DISK)
Set oClientNode = oXML.selectSingleNode("//CLIENT")
iClientAge = oClientNode.getAttribute("age")
Set oXML = Nothing
Create an XML object, load your document, select a node with an XPath query, get an attribute from it.
|