PDA

View Full Version : [asp] Download forzato senza il pulsante open


alexdemarco
04-10-2007, 08:56
Ciao a tutti.
Con lo script riportato, ho la possibilità di far scegliere all'utente se aprire un file nel browser o scaricarlo in locale. E' possibile impedire la visualizzazione del pulsante "open", lasciando solo "Save", anche se il file da scaricare ha un'estensione che IE riesce a leggere?

Al limite posso intercettare il click dell'utente sul pulsante "Open"?

Grazie

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

objStream.Type = adTypeBinary
objStream.Open
objStream.LoadFromFile FName

Response.AddHeader "Content-Disposition", "attachment; filename=" & request("f") & LCase (Right(rs("file"), 4))

FType = LCase (Right(rs("file"), 4))

if FType = ".pdf" then
Response.ContentType = "application/pdf"
elseif FType = ".doc" then
Response.ContentType = "application/msword"
else
Response.ContentType = "application/octet-stream"
end if

Response.BinaryWrite objStream.Read

Response.Flush()
Response.End()


objStream.Close
Set objStream = Nothing