Questo script permette di avere uno script per effettuare il download di files senza mostrarne il vero indirizzo, o proteggendo il tutto tramite delle password.
Viene utilizzato l'oggetto Stream di ADO 2.5 o superiore.
<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library"--> <% ' METADATA SERVE PER IMPORTARE LE COSTANTI DI ADO2.5 Dim objStream Set objStream = Server.CreateObject("ADODB.Stream") objStream.Type = adTypeBinary objStream.Open objStream.LoadFromFile Server.MapPath("prova.zip") 'Al browser Response.ContentType = "application/x-zip-compressed" Response.BinaryWrite objStream.Read objStream.Close Set objStream = Nothing %>
prova.zip deve essere un semplice file zippato da usare come test.
Per una lista dei Mime Type si veda:
https://www.aspitalia.com/articoli/mime.asp
ADO 2.5 si può scaricare da
http://www.microsoft.com/data/
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.