per maggiore leggibilita', creo un nuovo post adhoc

vorrei scrivere un file xml (che non esiste ora, e' questo il problema ?)
ecco il testo sempificato, cosi' se qlc potesse provarlo

grazie mille
ciao


Citazione:

<HTML>
<head>
<TITLE>Creazione file XML </TITLE>
</head>
<body class="Pagina" >
<%
Dim objXmlDom
Set objXmlDom = Server.CreateObject("Microsoft.XMLDOM")
objXmlDom.async = False
objXmlDom.load Server.MapPath("/public/XML/prova.xml")

Dim szSqlDaEseguire, dDataInsSql, iNumVersionePiattaforma, szNomeDB

Dim root, carica
carica = objXmlDom.documentElement.appendChild
Set root = objXmlDom.carica(objXmlDom.createElement("record") )
Set recordXML = root.appendChild(objXmlDom.createElement("record") )
recordXML.Text = "ciao"
objXmlDom.Save Server.MapPath("/public/XML/prova.xml")
%>

</BODY>
</HTML>