ASP实现强制图片下载函数

2020 年 6 月 2 日1690

容器云强势上线！快速搭建集群，上万Linux镜像随意使用

ASP代码中将图像插入代码后，尽管图像仍然可以正常显示，但文件的内容和大小已经更改，下面是爱站技术频道小编带给大家的ASP实现强制图片下载函数，一起来看看吧！






function downloadFile(strFile)




    strFilename = server.MapPath(strFile)




 




    Response.Buffer = True




    Response.Clear




 




    Set s = Server.CreateObject("ADODB.Stream")




    s.Open




 




    s.Type = 1




 




    on error resume next




 




    Set fso = Server.CreateObject("Scripting.FileSystemObject")




    if not fso.FileExists(strFilename) then




        Response.Write("

Error:

" & strFilename & " does not exist

") Response.End end if Set f = fso.GetFile(strFilename) intFilelength = f.size s.LoadFromFile(strFilename) if err then Response.Write("

Error:

" & err.Description & "

") Response.End end if Response.AddHeader "Content-Disposition", "attachment; filename=" & f.name Response.AddHeader "Content-Length", intFilelength Response.CharSet = "UTF-8" Response.ContentType = "application/octet-stream" Response.BinaryWrite s.Read Response.Flush s.Close Set s = Nothing End Function

上文是爱站技术频道小编给大家整理的ASP实现强制图片下载函数，希望对大家学习这方面知识有所帮助，也希望大家能继续支持js.aizhan.com！


原文链接:https://js.aizhan.com/develop/asp/11276.html
如有疑问请与原作者联系

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com

特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有

0 0

相关文章