Originariamente inviato da saltodifondi
un file csv lo tratti come un normale file di testo usando ";" separatore di colonna e il VbCrLf come separatore di riga.

lo salvi sul server come file.csv con FSO
codice:
'una volta creato il recordset a tuo piacimento....
testo_csv = ""
'Crea l'intestazione con i nomi dei campi
i = 0
For i = 0 To rs.Fields.Count - 1
           testo_csv = testo_csv & " & rs.Fields(i).name & ";"
next
testo_csv = testo_csv & VbCrLf

'ora aggiungiamo il contenuto del recordset
i = 0
do while not rs.eof

           For i = 0 To rs.Fields.Count - 1
                      testo_csv = testo_csv & " & rs.fields(i).value & ";"
           Next

           testo_csv = testo_csv & VbCrLf
           rs.movenext
loop

'ora creare il file csv


path  = server.mappath("/cartella_con_permessi/csv/")
nome = "FileCSV.csv" 
completo = path & nome 

Set fso = CreateObject("Scripting.FileSystemObject") 

Set file = fso.CreateTextFile(completo) 
file.WriteLine(testo_csv)

file.Close 

Set file = Nothing 
Set fso = Nothing

Grazie, hai chiarito i miei dubbi, ciao