［原］Asp.net中以對話方塊形式下載檔案（VB.net）

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        '在此處放置初始化頁的使用者代碼
        Dim imgUrl As String = Me.Request.QueryString("url") '//取出檔案的實體路徑。
        Me.DownloadFile(imgUrl)
    End Sub
  
  Private Function DownloadFile(ByVal filename As String)
        Dim saveFileName As String
        Dim startIndex As Int32 = filename.LastIndexOf("\") + 1
        saveFileName = filename.Substring(startIndex)
        Dim fi As System.IO.FileInfo = New System.IO.FileInfo(filename)
        Dim fileExtName As String = fi.Extension
        Dim DEFAULT_CONTENT_TYPE As String = "application/unknown"
        Dim regKey, fileExtKey As Microsoft.Win32.RegistryKey
        Dim fileContentType As String
        Try
            regKey = Microsoft.Win32.Registry.ClassesRoot
            fileExtKey = regKey.OpenSubKey(fileExtName)
            fileContentType = fileExtKey.GetValue("Content Type", DEFAULT_CONTENT_TYPE)

        Catch ex As Exception
            fileContentType = DEFAULT_CONTENT_TYPE
        End Try
        Me.Response.Clear()
        Response.Charset = "utf-8"
        Me.Response.Buffer = True
        Me.EnableViewState = False
        Me.Response.ContentEncoding = System.Text.Encoding.UTF8
        Me.Response.AppendHeader("Content-Disposition", "attachment;filename=" & saveFileName)
        Me.Response.ContentType = fileContentType
        Me.Response.WriteFile(filename)
        Me.Response.Flush()
        Me.Response.End()
    End Function

我的這個程式能夠下載Jpg圖片等檔案，但在儲存對話方塊中的檔案名稱，如果是漢字就不能正常顯示（顯示亂碼），字母和數字都能正常顯示，希望各位能幫忙解決一下。先謝了