Como faço para iniciar um download automaticamente ?

[feasso 0]

Tenho uma página com um um link, que leva o usuário para uma página com um tempo descritivo.

 

Nesta página com o texto descritivo deve iniciar um download automáticamente, como faço isso ?

[Ted k' 126]

dê uma varredura no fórum sobre forçar downloads, tem vários tópicos disso!

[xanburzum 169]

<%

Dim Arquivo

Arquivo = Request("arquivo")

 

Response.Buffer = True

Response.AddHeader "Content-Type","application/x-msdownload"

Response.AddHeader "Content-Disposition","attachment; filename=" & Arquivo

Response.Flush

 

Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Open

objStream.Type = 1

objStream.LoadFromFile Server.MapPath(Arquivo)

Response.BinaryWrite objStream.Read

objStream.Close

Set objStream = Nothing

Response.Flush

%>