Salvare Xml in un file .csv

[Surrender79]

Ciao, vi siete mai imbattuti in routine che trasformano risultati di codice xml in file .csv? Se sì, potete darmi suggerimenti utili su come fare?
Oppure conoscete link utili relativi a questo argomento?

Grazie

[Joe Taras]

Originariamente inviato da Surrender79
Ciao, vi siete mai imbattuti in routine che trasformano risultati di codice xml in file .csv? Se sì, potete darmi suggerimenti utili su come fare?
Oppure conoscete link utili relativi a questo argomento?

Grazie

Scusa l'ignoranza, Cos'è un file .csv?
Se è una estensione non associata a nulla sappi che l'importante è che il contenuto del file sia XML well formed e puoi cmq leggerlo.

Se, per esempio punti a questo file:
edu.supereva.it/betweenol/Groove/HotNews/HotNews.osd questo è un file in formato XML e verrà aperto come tale.

[Surrender79]

E' un file che viene letto da Excel, ha i campi separati da virgole.
Praticamente io vado a leggere un file xml e voglio tirar fuori solo il contenuto dei tag; ad esempio se c'è scritto <table>COLONNA1</table> io voglio tirar fuori solo COLONNA1.

Ci sono riuscita però il file mi viene visualizzato sul browser nonostante io abbia messo delle istruzioni che dovrebbero farmi apparire la finestra "Salva con nome" e che mi permette di salvarmi il file dove voglio. Sotto c'è il mio codice, le righe finali servono per farmi comparire la finestra anzichè visualizzare il file:

Public Class vdam_esporta
    Inherits System.Web.UI.Page


    'Chiamata richiesta da Progettazione Web Form.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub

    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
        'CODEGEN: questa chiamata al metodo è richiesta da Progettazione Web Form.
        'Non modificarla nell'editor del codice.
        InitializeComponent()
    End Sub


    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim VisExp As New BLClass.EsportaXml()
        Dim str As String
        Dim Varstr As New DataSet()
        Varstr.ReadXml(System.Configuration.ConfigurationSettings.AppSettings.Get("testPath") + "TestMacchina.xml")
        str = VisExp.EsportaDati(Varstr.GetXml)
        Response.Clear()
	Response.ContentType = "text/csv"
	Response.AppendHeader("Content-Disposition", "Attachment; filename=esporta.csv")
	Response.Write(str)
    End Sub
		
End Class