Ciao a tutti,
ho un piccolo problema con il download dei file tramite il protocollo http.

Quando cerco di scaricare un file di medie dimensione, cioè superiore a 4MB il download mi viene bloccato con la barra delle informazioni di Intenet explorer mentre se è inferiore a 4MB il tutto funziona correttamente.

Il mio applicativo è su un server 2003 con IIS 6.0(non so se può essere utile).

Per finire inserisco anche il codice della pagina

<%
Response.Buffer = True
Dim strFilePath, strFileSize, strFileName

Const adTypeBinary = 1

strFilePath = Request.QueryString("File")
strFileSize = Request.QueryString("Size")
strFileName = Request.QueryString("Name")


Response.Clear

Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
'response.write strFilesize
'response.end


strFileType = lcase(Right(strFileName, 4))


Select Case strFileType
Case ".asf"
ContentType = "video/x-ms-asf"
objStream.LoadFromFile strFilePath
Case ".avi"
ContentType = "video/avi"
objStream.LoadFromFile strFilePath
Case ".doc"
ContentType = "application/msword"
objStream.LoadFromFile strFilePath
Case ".zip"
ContentType = "application/zip"
objStream.LoadFromFile strFilePath
Case ".xls"
ContentType = "application/vnd.ms-excel"
objStream.LoadFromFile strFilePath
Case ".gif"
ContentType = "image/gif"
objStream.LoadFromFile strFilePath
Case ".jpg", "jpeg"
ContentType = "image/jpeg"
objStream.LoadFromFile strFilePath
Case ".wav"
ContentType = "audio/wav"
objStream.LoadFromFile strFilePath
Case ".mp3"
ContentType = "audio/mpeg3"
objStream.LoadFromFile strFilePath
Case ".mpg", "mpeg"
ContentType = "video/mpeg"
objStream.LoadFromFile strFilePath
Case ".rtf"
ContentType = "application/rtf"
objStream.LoadFromFile strFilePath
Case ".htm", "html"
ContentType = "text/html"
objStream.LoadFromFile strFilePath
Case ".asp"
ContentType = "text/asp"
objStream.LoadFromFile strFilePath
case ".txt"
ContentType="text/txt"
objStream.LoadFromFile strFilePath
Case Else
'Handle All Other Files
ContentType = "application/octet-stream"
objStream.LoadFromFile strFilePath

End Select


Response.AddHeader "Content-Disposition", "attachment; filename=" & strFileName
Response.AddHeader "Content-Length", strFileSize
' In a Perfect World, Your Client would also have UTF-8 as the default
' In Their Browser
Response.Charset = "UTF-8"
Response.ContentType = ContentType

Response.BinaryWrite objStream.Read
Response.Flush

objStream.Close
%>

Vi ringrazio per la disponibilità