TXT.WORD文档下载在本地,而不是在浏览器中打开

原创 2007年09月21日 11:54:00
<%
Response.Buffer=true
取得要下载的文件,如果不为空。就下载
dim url,trueurl
url="下载文件路径和下载文件名"
   fname=Request("filename")
   if fname<>"" then
      trueurlurl=server.MapPath("/") &url
   end if
   set objFso=server.CreateObject("scripting.filesystemobject")
   set fn=objFso.GetFile(trueurl)
   flsize=fn.size
   flname=fn.name
   set fn=nothing
   set objFso=nothing
  
   set objStream=server.CreateObject("adodb.stream")
   objStream.Open
   objStream.Type=1
   objStream.LoadFromFile url
  
   select case lcase(right(flname,4))
      case ".asf"
      ContentType="video/x-ms-asf"
      case ".avi"
      ContentType="video/avi"
      case ".doc"
      ContentType="application/msword"
      case ".zip"
      ContentType="application/zip"
      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 ".txt"
      ContentType="text/plain"
  Case ".ASP", ".ASA", "ASPX", "ASAX", ".MDB"
        Response.Write "受保护文件,不能下载."
        Response.End
      case else
      ContentType="appliation/octet-stream"
   end select

   Response.AddHeader "Content-Disposition", "attachment; filename="&flname
   Response.AddHeader "Content-Length", flsize
   Response.CharSet="UTF-8"
   Response.ContentType=ContentType
   Response.BinaryWrite objStream.Read
   Response.Flush
   Response.Clear()
   objStream.Close
   set objStream=nothing
%>
 

直接下载不打开

给你个函数,把文件名(带路径)和你下载显示的文件标题作为参数传入就行, 页面用个linkbutton,然后在linkbutton的click事件里调用这个函数即可 如果用hyperlink,则打开单独...
  • yeness
  • yeness
  • 2008年02月03日 09:03
  • 631

默认点击下载pdf等文件而不是在浏览器中打开

Dim StreamDim ContentsDim FileNameDim FileExtConst adTypeBinary = 1FileName = Request.QueryString("F...
  • whoopee
  • whoopee
  • 2005年01月17日 14:12
  • 2722

通知浏览器下载文件而不是打开文件

需要在前台的html中进行设置,将onclick事件指向download_file函数并在download_file中调用后台DownLoadFile函数,以此来实现a标签中下载文件而不是打开文件。 ...
  • u013140441
  • u013140441
  • 2015年03月02日 12:51
  • 383

Java 下载文件不在浏览器中直接打开

今天在做一个文件下载,想下载一个.sis类型的文件。可下载的结果却总是在浏览器中直接打开了,并没有像我们平常去下载东西一样弹出一个可以选择为“打开或是保存”的文本框。搞了半天终于搞好了,现在想和大家来...
  • jasontome
  • jasontome
  • 2011年10月16日 16:50
  • 1728

如何使用资源管理器而不是浏览器,打开FTP?

是不是习惯用资源管理器打开FTP的你某一天FTP却是以浏览器的界面展现你面前,只能单个下载文件,无法上传文件,无法下载文件夹,怎么办?你可以通过修改注册表来达到资源管理器打开FTP的目的:[HKEY_...
  • w3lmcctl
  • w3lmcctl
  • 2008年12月09日 09:41
  • 5045

图片(txt等)实现默认下载而不是浏览器默认打开(Java版)

图片实现默认下载而不是打开图片(Java版)
  • u011768325
  • u011768325
  • 2015年06月04日 17:11
  • 2578

直接让浏览器下载文件而不打开

直接让客户端浏览器下载已知类型(*.doc)的文件  ,而不使用关联程序打开。     伦理片 http://www.dotdy.com/     Web开发人员都有过这样的疑问,如何让一个文件,...
  • h254541060
  • h254541060
  • 2015年09月10日 13:01
  • 2227

配置tomcat,使文件默认下载而非网页中打开

配置tamcat/conf/web.xml文件 在下面添加 vnc application/vncviewer
  • raphero
  • raphero
  • 2012年12月13日 10:00
  • 1318

文件下载 浏览器直接打开文件而不是保存 相关问题

昨天做SpringMVC 文件上传下载功能时遇到一堆问题。其中有个问题就是txt css js html xml pdf 等等文件下载时浏览器(html5的a标签download属性不是所有浏览器都支...
  • boneix
  • boneix
  • 2016年02月02日 10:04
  • 1781

当浏览器 直接打开txt,png等时是直接读取而不是下载时解决方法

当我们把文件上传到项目 后  数据库会存入上传文件路径,在页面上时就会通过location.href='路径'  来直接下载 但是这样下载txt等文件时 浏览器会直接打开 所以换了种方式 ,...
  • wwwzhouyiyi
  • wwwzhouyiyi
  • 2015年11月18日 09:59
  • 2043
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:TXT.WORD文档下载在本地,而不是在浏览器中打开
举报原因:
原因补充:

(最多只允许输入30个字)