求大神指点 邮件附件下载~~~~在线等回复 急~

gxhxxx 2014-06-27 11:30:58

string filePath = HttpContext.Current.Server.MapPath(strFile);//路径
FileInfo fileInfo = new FileInfo(filePath);
string ContentType = fileName.Substring(fileName.LastIndexOf("."));
//context.Response.Clear();
//context.Response.ClearContent();
//context.Response.ClearHeaders();
//context.Response.AddHeader("Content-Disposition", "attachment;filename=" + fileName);
//context.Response.AddHeader("Content-Length", fileInfo.Length.ToString());
//context.Response.AddHeader("Content-Transfer-Encoding", "binary");
context.Response.ContentType = ContentType;
context.Response.ContentEncoding = System.Text.Encoding.GetEncoding("gb2312");
context.Response.WriteFile(fileInfo.FullName);


我使用的是response的writeFile 但是没有效果 代码的没有报错 ~· 求大神们 指点啊
...全文
68 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
csdn_aspnet 2014-06-27
  • 打赏
  • 举报
回复
'将下边的文件保存为Download.asp就可以了, '然后根据需要传要下载的文件过来就可以了。 '格式:Download.asp?FileName=要下载的文件名 Dim Stream Dim Contents Dim FileName Dim FileExt Const adTypeBinary = 1 FileName = Request.QueryString("FileName") if FileName = "" Then Response.Write "无效文件名." Response.End End if ' 下面是不希望下载的文件 FileExt = Mid(FileName, InStrRev(FileName, ".") + 1) Select Case UCase(FileExt) Case "ASP", "ASA", "ASPX", "ASAX", "MDB" Response.Write "受保护文件,不能下载." Response.End End Select ' 下载这个文件 Response.Clear Response.ContentType = "application/octet-stream" Response.AddHeader "content-disposition", "attachment; filename=" & FileName Set Stream = server.CreateObject("ADODB.Stream") Stream.Type = adTypeBinary Stream.Open Stream.LoadFromFile Server.MapPath(FileName) While Not Stream.EOS Response.BinaryWrite Stream.Read(1024 * 64) Wend Stream.Close Set Stream = Nothing Response.Flush Response.End

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧