Download sicuro di files con ASP

Daniele Bochicchio, in Classic ASP, Coding, il 13 ottobre 2003 alle 08:00

ASP

Nello script #191 e #135 abbiamo già visto come effettuare il download sicuro e dare un nome al file che non sia lo stesso della pagina.
Ebbene, una semplice combinazione di questi due script da' origine a quest'ultimo, che proporrà il nome da dare al file in fase di salvataggio prendendolo dalla variabile strNome.

<!--METADATA TYPE="typelib"
       UUID="00000205-0000-0010-8000-00AA006D2EA4"
      NAME="ADODB Type Library"
-->
<%
   ' METADATA SERVE PER IMPORTARE LE COSTANTI DI ADO2.5

   Response.Buffer = true

   strNome = "nomedelfile.zip"

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

   objStream.Type = adTypeBinary
   objStream.Open
   objStream.LoadFromFile Server.MapPath("prova.zip")

   ' stream generico, IE chiede di salvare
   Response.ContentType = "octet/stream"

   ' imposto il nome del file
   Response.AddHeader "Content-Disposition", "attachment;filename=" & StrNome

   Response.BinaryWrite objStream.Read

   objStream.Close
   Set objStream = Nothing

%>