利用Stream下载文件
来源:互联网 发布:java做安卓游戏 编辑:程序博客网 时间:2024/04/29 03:07
Function dl(f,n)
On error resume Next
Set s=CreateObject("Adodb.Stream")
s.Mode=3
s.Type=1
s.Open
s.Loadformfile(f)
if Err..Number>0 then
Response.status="404"
Else
Response.ContentType="application/octet-stream"
Response.AddHeader "Content-Disposition:","attachment;filename=" & n
Range=Mid(Request.ServerVariables("HTTP_RANGE"),7)
if Range=" " then
Response.BinaryWrite(s.Read)
Else
s.position=clng(split(Range,"-")(0))
Response.BinaryWrite(s.Read)
End If
End if
Response.End
函数调用实例
call dl(Server.MapPath("text.zip"),"test.zip")
- 利用Stream下载文件
- 利用stream直接下载文件
- Asp利用Stream下载文件
- 利用Adodb.Stream直接下载文件
- 利用Adodb.Stream直接下载文件
- 利用Adodb.Stream直接下载文件
- Asp利用Stream实现文件下载
- 用stream直接下载文件
- Struts2 文件下载(Stream)
- 利用adodb.stream直接下载任何后缀的文件(防盗链)
- 利用adodb.stream直接下载任何后缀的文件(防盗链)
- WCF利用Stream上传大文件
- 使用Adodb.Stream下载大文件
- struts2文件下载 <result type="stream">
- struts2文件下载 <result type="stream">
- struts2文件下载 <result type="stream">
- struts2 result="stream''文件下载
- action type="stream" 文件下载
- 持久层概述
- lucene搜索引擎配置
- BIO socket summary
- Lingo是个好东西
- 药品认证
- 利用Stream下载文件
- 支持FireFox 3.0.1版本的Alexa Toolbar
- 设定linux的ip地址
- 设定linux系统支持的字符集
- 数值类型与String的转换
- Trap Logic Unit(TLU)分析
- Windows 2003声卡驱动的安装.
- 弹出自定义窗口
- ORACLE OAF 开发中遇到的问题