test parser ASP

<%
' js
'	xmlDoc=new ActiveXObject("Microsoft.XMLDOM");
'	xmlDoc.async=false;
'	xmlDoc.load("Corsi.xml");

' Set xmlDoc=Server.CreateObject("Microsoft.XMLDOM") 
Set xmlDoc=Server.CreateObject("MSXML.DOMDocument") 
' xmlDoc.async="false"
xmlDoc.loadXML("Corsi.xml")

Response.Write "
Error Code: " & xmlDoc.parseError.errorCode & "
Error Reason: " & xmlDoc.parseError.reason & "
Error Line: " & xmlDoc.parseError.line & "
Error LinePos: " & xmlDoc.parseError.linePos  & "
Error srcText: " & xmlDoc.parseError.srcText & "
Error URL: " & xmlDoc.parseError.url & "
Error LinePos: " & xmlDoc.parseError.filePos

Response.Write("
analisi con DOM
")

' XML DOM
' set  root=xmlDoc.documentElement
 Response.write("nome del nodo: " & xmlDoc.nodeName & "
")
' Response.write("attributo: " & root.getAttribute("xmlns") & "
")
Response.write("testo: " & xmlDoc.text & "")

set obj=Nothing
set doc=Nothing
%>