Attraverso questo script recupero un nodo in XML e ne visualizzo il testo ma, non mantiene gli a capo.

set xml_settaggi=Server.CreateObject("MSXML2.DomDocument")
xml_settaggi.async=False
xml_settaggi.resolveExternals = True
xml_settaggi.validateOnParse = True
xml_settaggi.preserveWhiteSpace = true
xml_settaggi.load (Server.MapPath(percorso))

Response.write xml_settaggi.selectSingleNode("appunto/corpo").text


L'output è: ciao io sono andrea
Ma nel file xml, ogni parola è su una riga.

Ho provato a fare un Replace(xml_settaggi.selectSingleNode("appunto/corpo").text, Vbcrlf, "<br>") ma non funziona.

Qualcuno si è già trovato di fronte a questo problema?