Cargar XML en 2 Objetos LIST

[ssccaann43]

Bien, tengo un archivo XML con esta estructura...




Me gustaría saber si es posible cargar la información de ese archivo en 2 objetos, 2 LIST...

En el List1 cargar la información de Title
En el List2 cargar la información de Location

Si alguien tiene un ejemplo, o algo donde pueda guiarme, se lo agradezco...

Saludos

[ssccaann43]

Ok, resuelto el tema...

Por si alguien necesita algo igual... Puede mirar este ejemplo...!

Bajar Aquí

Saludos...

[LeandroA]

Código: [Seleccionar]

Option Explicit

Private Sub Form_Load()
    Dim ObjXmlDoc As Object
    Dim Nodo As Object
   
   
    Set ObjXmlDoc = CreateObject("Microsoft.XMLDOM") 'New DOMDocument
    ObjXmlDoc.resolveExternals = True
    ObjXmlDoc.async = False
   
    Call ObjXmlDoc.Load("http://www.musicaseria.net/playlist.php")
   
    For Each Nodo In ObjXmlDoc.getElementsByTagName("playlist/trackList/track")
        List1.AddItem Nodo.childNodes(0).Text
        List2.AddItem Nodo.childNodes(1).Text
    Next

End Sub

[ssccaann43]

Leandro, sos Groso...!