试试,可以,我用过.files\5.JPG改为要下载的文件名.
Dim scdirectory As String
Dim scfilename As String
Dim filepath As String
scdirectory = Server.MapPath("files\5.JPG")
scfilename = "5.jpg"
filepath = scdirectory
Response.Charset = "UTF-8"
Response.AppendHeader("Content-Disposition", "attachment;filename=text.xls")
Response.ContentEncoding = System.Text.Encoding.Default
Dim tw As System.IO.StringWriter = New System.IO.StringWriter
Dim hw As Web.UI.HtmlTextWriter = New Web.UI.HtmlTextWriter(tw)
..
Response.End()
一般来说,能下载的都是IE不能直接打开的。如*.zip,*.exe如果是这类文件你直接做 超 级链接就可以了。
如果是网页图片这些。就要想想办法了。
例如你可以把一个图片当作excel输出。你可以试一下,我没试过。
Response.AddHeader("Content-Disposition", "attachment;filename=a.jpg)
Response.Charset = "UTF-8"
Response.ContentType = "application/vnd.ns-excel"
Response.Charset = ""
Dim sw As New StringWriter()
Dim hw As New HtmlTextWriter(sw)
DataGrid1.RenderControl(hw)
Response.Write(sw)
Response.End()