Generar un archivo excel con ASP clásico

Código ASP clásico

Con un archivo desarrolado en ASP clasico podemos realizar una salida en un formato de tipo CSV, que es un archivo que puede abrirse con Excel o cualquier hoja de cálculo. El archivo CSV es en realidad un archivo de texto en el que se ponen los valores de cada una de las columnas separados por comas y cada fila de valores en una línea independiente.

El código de ASP clásico para generar un archivo excel es el siguiente:

 
<%
Set conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")

conn.Open dsn

RS.Open "select * from clientes", conn

Response.ContentType = "application/csv"
Response.AddHeader "Content-Disposition", "filename=resultado.csv;"

for i = 0 to RS.Fields.Count-1
if i = (RS.Fields.Count - 1) then
Response.Write lcase(RS.Fields(i).Name)
else
Response.Write lcase(RS.Fields(i).Name) & ","
end if
next

Response.write vbNewLine
Response.write vbNewLine

while not RS.EOF

for u=0 to RS.Fields.Count - 1
if u = (RS.Fields.Count - 1) then
Response.Write RS.Fields(u).Value
else
Response.Write RS.Fields(u).Value & ","
end if
next

response.write vbNewLine

rs.MoveNext
wend

Response.write vbNewLine
Response.write vbNewLine

Set RS = Nothing
Set conn = Nothing

%>

tags: genera excel asp clasico gratis, genera excel asp clasico campo upload personalizado, genera excel asp clasico, exportar excel asp clasico, excel asp classic, asp classic excel export, asp classic excel, classic asp excel read, classic asp excel