Dwnload file, senza barra di conferma di IE

            Response.Clear()
            Response.ContentType = "application/octet-stream"
            Response.AddHeader("Content-Disposition", "attachment; filename=" & nFile)

            Response.WriteFile(nDir & "/" & nFile)
            Response.Flush()
            Response.Close()

' Recupero il file da scaricare
        Dim download

        ' Creo l'oggetto ADODB.Stream
        download = CreateObject("ADODB.Stream")

        ' Apro la connessione e carico il file
        download.Type = 1
        download.Open()
        download.LoadFromFile(Server.MapPath("docs\promozioni\filedascaricare.ext))

        ' Aggiungo le intestazioni del tipo di file
        Response.AddHeader("Content-Disposition", "attachment; filename=filedascaricare.ext)
        Response.ContentType = "application/octet-stream"
        Response.BinaryWrite(download.Read)

        download.Close()
        download = Nothing