Estrarre il contenuto di un file XML con XMLDOM
di 
Daniele Bochicchio, in XML,
Sfruttando l'XMLDOM è possibile attraversare tutta la struttura di un file XML, mostrandone quindi il nome dei nodi (ed i relativi valori) semplicemente sfruttando la ricorsione.
In questo esempio viene effettuato un ciclo su tuti i nodi presenti in un qualsiasi file XML, mostrandone a video tutti i valori.
Molto comodo in quase di debug di un file XML, oppure per mostrarne a video in maniera rapida il contenuto:
<table border="1"><%
Set objXMLDoc = Server.CreateObject("Microsoft.XMLDOM")
objXMLDoc.load(Server.MapPath("rss.xml"))
Set objChildNodes = objXMLDoc.documentElement.childNodes
Dim livello
livello = -1
' primo nodo
call AttraversaXML(objChildNodes)
set objChildNodes = Nothing
Set objXML = Nothing
Sub AttraversaXML(objChildNodes)
For Each strNode In objChildNodes
livello = livello + 1
if livello = 0 then Response.write("<tr>")
' nome del nodo
Response.write("<td><b>" & strNode.nodeName & "</b>")
' valore del nodo
if Len(strNode.nodeValue)>0 then Response.write(": " & strNode.nodeValue)
Response.write("</td>")
' se ci sono altri nodi, cicla su tutti
if strNode.ChildNodes.length>0 then
call AttraversaXML(strNode.childNodes)
end if
Response.write("</tr>" & VbCrLf)
Next
End Sub
%></table>Per approfondimenti su XML si veda:
http://xml.aspitalia.com/
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.
Approfondimenti
Nessuna risorsa collegata
