bueno, antes que nada bienvenido al foro, espero te sea de ayuda como lo ha sido para mi
por otro lado usa el buscador, ya se puso una solucion para hacerlo que es poner esto:
Código:
Response.ContentType = "application/x-unknown" ' arbitrary
FPath = server.mappath ("archivos\" & prod)
Response.AddHeader "Content-Disposition","attachment; filename=" & prod
Set adoStream = CreateObject("ADODB.Stream")
adoStream.Open()
adoStream.Type = 1
adoStream.LoadFromFile(FPath)
Response.BinaryWrite adoStream.Read()
adoStream.Close
Set adoStream = Nothing
Donde
prod es el nombre del archivo sacado de una base de datos
Espero te sirva