ASP.NET Problems downloading a file

Labeots · Apr 28, 2012

Hi all, I've been struggling trying to get the following code to work, so I can pass the filename through a query.string and the page will serve the file. Here is the code: <%@ Import Namespace="System.IO"%> <script language="VB" runat="server"> Sub Page_Load(sender As Object, e As EventArgs) Dim filepath As String = "C:Inetpubwebsites est_files\" Dim filename As String = trim(request.QueryString("file")) Dim strFileType As String = lcase(Right(filename, 4)) ' Feel Free to Add Your Own Content-Types Here Select Case strFileType Case ".asf" ContentType = "video/x-ms-asf" Case ".avi" ContentType = "video/avi" Case ".doc" ContentType = "application/msword" Case ".zip" ContentType = "application/zip" Case ".pdf" ContentType = "application/pdf" Case ".xls" ContentType = "application/vnd.ms-excel" Case ".gif" ContentType = "image/gif" Case ".jpg", "jpeg" ContentType = "image/jpeg" Case ".wav" ContentType = "audio/wav" Case ".mp3" ContentType = "audio/mpeg3" Case ".mpg", "mpeg" ContentType = "video/mpeg" Case ".rtf" ContentType = "application/rtf" Case ".htm", "html" ContentType = "text/html" Case ".asp" ContentType = "text/asp" Case Else 'Handle All Other Files ContentType = "application/octet-stream" End Select Response.Clear() Response.ContentType = "application/octet-stream" Response.AddHeader("Content-Disposition", _ "attachment; filename=""" & filename & """") Response.Flush() Response.WriteFile(filepath) End Sub </script> When the page loads it actually prompts the user to download a file. But the document that is downloaded is empty? Any ideas, thanks in advance James You go to all the trouble to choose one of several different types and then just toss away all that work??? And you never declared a variable type for your ContentType variable. And, finally, you try to use Response.WriteFile and pass it a *DIRECTORY* instead of a single file! May not be all the problems, but it's a start.Maybe instead of: Response.WriteFile(filepath) try Response.WriteFile(filepath & filename) .even if its just a piece of the puzzle

...untested. Just munging what was there. <%@ Import Namespace="System.IO"%> <script language="VB" runat="server"> Sub Page_Load(sender As Object, e As EventArgs) Dim filename As String = trim(request.QueryString("file")) ' we don't need the directory for anything in here, ' so let's use this variable to get the FULL PATH to the file! Dim filepath As String = "C:Inetpubwebsites est_files\" & filename ' might as well set up default content right here: Dim ContentType As String = "application/octet-stream" Dim strFileType As String = lcase(Right(filename, 4)) Select Case strFileType Case ".asf" ContentType = "video/x-ms-asf" Case ".avi" ContentType = "video/avi" Case ".doc" ContentType = "application/msword" Case ".zip" ContentType = "application/zip" Case ".pdf" ContentType = "application/pdf" Case ".xls" ContentType = "application/vnd.ms-excel" Case ".gif" ContentType = "image/gif" Case ".jpg", "jpeg" ContentType = "image/jpeg" Case ".wav" ContentType = "audio/wav" Case ".mp3" ContentType = "audio/mpeg3" Case ".mpg", "mpeg" ContentType = "video/mpeg" Case ".rtf" ContentType = "application/rtf" Case ".htm", "html" ContentType = "text/html" Case ".asp" ContentType = "text/asp" ' these lines not needed becuz default assigned initially ' Case Else ' 'Handle All Other Files ' ContentType = "application/octet-stream" End Select Response.Clear() Response.ContentType = ContentType Response.AddHeader("Content-Disposition", _ "attachment; filename=""" & filename & """") Response.Flush() Response.WriteFile(filepath) End Sub </script> ...finger it out for his own self. But whuddahel, I changed my mind [??] since you were being so nice. [You know where the word "nice" comes from? What it's Latin root is and the meaning thereof? You'll never want to be called "nice" again!]

ASP.NET Problems downloading a file

Labeots

New Member