ADO XML at få fat i data

ADO og XML

Jeg har save'd et persistent recordsæt med :

adoRecordset.Save App.Path & "\test.xml", adPersistXML

Hvorved jeg får noget XML :

<z:row id='{4692F23A-09F1-48E1-A3CB-006D11EABD2E}' filename='1982 Honda CB 1100 R.jpg' year='1982' make='Honda' model='CB 1100 R' displacement='Ukendt'/>


Data ligger som attributter, hvad jeg ikke lige havde forventet, men skide med det i første omgang.
Hvordan er det lige at jeg tilgår data i selve tagget, jeg har noget kode som ser såddan ud, kan det cirka bringes til at virke ..??    

Public Sub DisplayNode(ByRef Nodes As IXMLDOMNodeList, ByVal Indent As Integer)

    Dim sXml As String
    Dim xNode As IXMLDOMNode
    Indent = Indent + 2
    fMcRevy.lsMc.Clear
    For Each xNode In Nodes
          If xNode.nodeType = NODE_TEXT Then
            fMcRevy.lsMc.AddItem Space$(Indent) & xNode.parentNode.nodeName & ":" & xNode.Attributes.getNamedItem("make").nodeTypedValue
          End If
          sFileContent = sFileContent & Space$(Indent) & xNode.parentNode.nodeName & ":" & xNode.nodeValue
          If xNode.hasChildNodes Then
            DisplayNode xNode.childNodes, Indent
          End If
    Next xNode
     
End Sub

fMcRevy.lsMc er en list.

Please Please  MVH