文件下载制作方法

Xiaoxiong511 2003-10-17 05:18:24
一般在html中制作的连接,如果连接到某文件,点击就会自动打开的!
而单击保存是怎么实现的呢?

求教中...
...全文
78 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
purexu 2003-10-17
  • 打赏
  • 举报
回复
只要链接的浏览器显示不了就会下载,所以要下载的文件只要进行压缩(浏览器显示不了压缩文件)或改一下扩展名就可以了。
chense 2003-10-17
  • 打赏
  • 举报
回复


用流(stream)技术做下载
function dl(f,n)
on error resume next
Set S=CreateObject("Adodb.Stream")
S.Mode=3
S.Type=1
S.Open
S.LoadFromFile(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
end function

函数使用示例:
call dl(Server.MapPath("../download/07.zip"),"07.zip")

28,390

社区成员

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

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