escribir en un excel registros de la bd

[u_goldman]

Exporta tus registros a un csv, se ha tratado el tema anteriormente, básicamente lo que necesitas es un string que vaya incrementándose a partir de una fuente de datos, puede ser tu recordset
str = ""
str = str & campo1 & "," & campo2 & "," & campoN & vbCrLf
str = str & campo1 & "," & campo2 & "," & campoN & vbCrLf

Código:

if len(str) > 0 then
		Response.Buffer = True
		Response.ContentType = "text/plain"
		Response.AddHeader "Content-Disposition", "attachment;filename=archivo.csv"
		Response.Write(str)
		Response.Flush
		Response.End
end if

Y listo, tendrás un csv que puedes abrir mediante excel si asi lo deseas.

Saludos