scrivere su file xml

[7stars]

ciao,
vorrei scrivere su file xml il seguente testo:

<?xml version="1.0" encoding="UTF-8"?>
                     <menu>
                     <item>
                     <titolo></titolo>
					 <testo>"& variabile & "</testo></item>
</menu>

conosco i comandi per creare il file xml...mi fareste però un esempio per come vedere il suddetto testo nel file senza errori per i caratteri speciali...??? grazie 1000

[Domenix]

Metti il testo dentro <![CDATA[ testo ]]>

[7stars]

non ho capito come...
in ogni caso non capisco l'errore neanche se provo a crearlo da zero...i tags devono essere quelli per interfacciarlo ad un news reader in flash...:

<%

strTable = "nometabella"											'nome tabella					


Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database/database2.mdb")


	MySQL="Select bio from " & strTable
	Set MyRs=MyConn.Execute(MySQL)
	 
	
	dim bio
	bio = MyRs("bio")
	MyRs.close
	Set MyRs= Nothing
	MyConn.Close
'Inizializzo le Variabili 
Dim xmlDoc, root 
Dim xmlContent, success 
Dim xmlData 
Dim i 

'Creo l' oggetto MsXML2.DOMDocument 
Set xmlDoc = Server.CreateObject("msxml2.DOMDocument") 

'Creo il Documento XML 
xmlContent = "<menu>"
xmlContent = "<item>" 
xmlContent = xmlContent & "<titolo></titolo>" 
xmlContent = xmlContent & "<testo>" & bio & "</testo>"  
xmlContent = xmlContent & "</item>"
xmlContent = xmlContent & "</menu>" 
'Fine Creazione XML 

'Controllo se il File XML sia stato caricato Correttamente 
success = xmlDoc.loadXML(xmlContent) 
If success = True Then 
     'Visualizzo tutti i dati nel File XML 
     set xmlData = xmlDoc.getElementsByTagName("menu/item/titolo/testo") 
     For i = 0 To (xmlData.length - 1) 
          Response.Write "[*]" & xmlData.Item(i).xml 
     Next 
     set xmlData = nothing 
     'Fine visualizzazione 
Else 
     Response.Write "Impossibile caricare il File XMl... " & Server.HTMLEncode(xmlContent) 
End If 

'Salviamo il File XML 
xmlDoc.save Server.Mappath("http://www.dominio.com/public/provabio.xml") 

'Pulizia degli oggetti 
Set xmlDoc = Nothing 

%>

innanzitutto mi scrive Impossibile caricare...poi mi mette i tags ma non mi scrive il tag <menu> e dopodichè mi dà pure errore:
msxml3.dll error '80004005'

End tag was not expected at this location.

/public/provabio.asp, line 52
la linea 52 sarebbe:

xmlDoc.save Server.Mappath("http://www.echoesclub.com/public/provabio.xml")

ed io non vedo quale sia l'errore...

[Domenix]

xmlContent = xmlContent & "<testo><![CDATA[" & bio & "]]></testo>"

[7stars]

Originariamente inviato da Domenix

xmlContent = xmlContent & "<testo><![CDATA[" & bio & "]]></testo>"

così mi scrive anche CDATA... fa la stesso e mi dà lo stesso errore...

[Domenix]

xmlDoc.save Server.Mappath("/public/provabio.xml")

Sai a cosa server Server.mapPath ?

[7stars]

ah ok ho capito...il percorso non doveva essere assoluto...
quindi ora il file lo crea ma vuoto... l'output della pagina asp rimane però com'era prima ma senza errore...quindi in ogni caso mi scrive sempre all'inizio:
Impossibile caricare il File XMl... e non mi mette il primo tag <menu>
praticamente scrive così:

Impossibile caricare il File XMl... <item><titolo></titolo><testo><![CDATA[contenuto testo]]></testo></item></menu>

[7stars]

up

[Domenix]

'Creo il Documento XML 
xmlContent = "<menu>"
xmlContent = xmlContent & "<item>"

[7stars]

grande grandissimo come ho fatto a non vederlo!?!?? eh lo stress...