hola amigos tengo el siguiente problema, quiero descar un excel la cosa es que no me lo descarga ;si no que me baja el archivo "descarga" que el abrirlo tiene pura basura ... por favor espero me ayuden a encontrar el problema.. saludos cordiales.
<%
if request.querystring("descarga")="si"
Dim objStream, strFileName , archivo , carpeta
archivo = Request.QueryString("file")
carpeta = "/pagina/descarga/"
strFileName =""&carpeta&""&archivo&""
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1
objStream.Open
objStream.LoadFromFile Server.MapPath(strFileName)
Response.AddHeader "Content-Disposition", "attachment; filename=" & strFileName
Response.ContentType = "application/octet-stream"
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing
response.write"Descargando archivo"
else
response.write"<a href=""descarga.asp?descarga=si&file=archivo.xls"" >Descargar
este archivo</a>"
end if
%>