esportare una table ASP in .csv o .xls

[maryenino]

Salve ,
purtroppo non sono esperta in ASP, cmq la situazione è questa: ho una form ASP dove carico dei dati in una table con connessione al DB SQL Server, fin qui tutto ok, ma io vorrei esportare cio' che vedo in un file excel o anche in un formato .csv, tramite un pulsante...
Forse è una cretinata, ma non riesco a capire come fare...mi potete aiutare, per favore? grazie mille, un saluto a tutti

[robbe2000]

Il percorso lo metti te in base a dove vuoi caricare il file

Dim objFso, objFile
Set objFso=Server.CreateObject("scripting.FileSystemObject")


path = Server.MapPath(".")
path = path & "\temp\" & nomefile  & ".csv"

If objFso.FileExists(path) then
	objFso.DeleteFile path,true
end if

objFso.CreateTextFile (path)
Set Ogg = objFso.GetFile (path)
Set OggText = Ogg.OpenAsTextStream(2)


' componi la prima riga con intestazione se ti serve ad es.
strtitolo ="Nome;Cognome;età;indirizzo"

OggText.WriteLine strtitolo

' poi attraverso un ciclo prendi i dati
strstringa =strstringa & rs("nome") &";" &  rs("cognome") &";" &  rs("eta") &";" &  rs("indirizzo")  

'dentro il ciclo sempre scrivi la riga
OggText.WriteLine strstringa

a questo punto hai creato il file csv.
Per aprire il file non ti conviene indirizzare la pagina al file ma utilizza una pulsante o qualcosa del genere per scaricare il file.


<input type=button name=apri id=apri value=Apri onClick="window.open('<%=path%>')">