Ciao, ho un file XML con il seguente schema:

codice:
<?xml version="1.0" standalone="yes"?>
<ExportDB>
 <artico>
  <ar_codart>aaa</ar_codart>
  <ar_codalt>a1a1a1</ar_codalt>
 </artico>
 <artico>
  <ar_codart>bbb</ar_codart>
  <ar_codalt>b2b2b2</ar_codalt>
 </artico>
 <list>
  <li_codart>ccc</li_codart>
  <li_codalt>c1c11c</li_codalt>
 </list>
 <list>
  <li_codart>ddd</li_codart>
  <li_codalt>d2d2d2</li_codalt>
 </list>
 <list>
  <li_codart>eee</li_codart>
  <il_codalt>e1e1e1</li_codalt>
 </list>

</ExportDB>

... e devo sviluppare una funzione che mi visualizza tutti qualcosa di questo genere:

artico:
- ar_codart: aaa
- ar_codalt: a1a1a1
...
list:
- li_codart: ccc
- li_codalt: c1c1c1
...


sto utilizzando il seguente codice per i test:
Codice PHP:
<%
'Utilizzo oggetto DOM per caricare il file xml 
Set objXML = Server.CreateObject("msxml2.DOMDocument.3.0")

objXML.async = false
objXML.setProperty "ServerHTTPRequest", True
objXML.validateOnParse =false
objXML.preserveWhiteSpace = false


url = "http://www.birraiolo.it/xyz.xml"

caricoFile = objXML.Load(url)


' Controllo se e' stato caricato il file
If Not caricoFile Then
    ' In caso di errore avviso quale errore si e' verificato
    Response.write "

[b]Errore[/b]
: " & objXML.parseError.errorCode & "
"
    Response.Write "Linea: " & objXML.parseError.line & "/"
    Response.WRite "Colonna: " & objXML.parseError.linepos & "</p>"
Else
    ' In caso non vi sia nessun errore, proseguo e carico le info del file xml 
    Set Nodo = objXML.getElementsByTagName("ExportDB/artico")
    For Each objNodi In Nodo
        ' Sfoglio i nodi
        For Each objNodo In objNodi.childNodes
            [B] %>[*]<%=ucase(objNodo.nodeName)%>: <%=objNodo.firstChild.nodevalue%><%[/B]
        Next
        %><HR /><%
    Next
    set Nodo = Nothing
End if
%> 

... mi restituisce il seguente errore sulla riga in grassetto:
Errore di run-time di Microsoft VBScript (0x800A01A8)
Necessario oggetto: '[object]'



... avete qualche idea? non so più dove sbattere la testa...

Grazie &