文件下载
来源:互联网 发布:linux 连接日志 编辑:程序博客网 时间:2024/04/30 10:58
<%
dim rsFileInfo , objFile , lngFileID ,fileName
lngFileID=clng(request("FileID"))
'resonse.write "l="&lngFileID
'清除已经存在的HTTP header信息
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear
'将HTTP header置为application/x-rar表示传送的将是压缩包
set objFile=Server.CreateObject("JZYS_COM.FileOperate")
if objFile.ErrNumber=0 then set rsFileInfo=objFile.Get_File(clng(lngFileID))
if objFile.ErrNumber=0 then
fileName=rsFileInfo("FILEREALNAME")
response.contenttype="application/x-rar"
response.AddHeader "content-disposition", "attachment; filename="& fileName
response.binarywrite rsFileInfo("FILECONTENT")
rsFileInfo.Close
set objFile=nothing
else
Response.Write("<script language=javascript>window.location='../Public/Error.asp?strNo=" & objFile.ErrNumber & "&strError=" & objFile.ErrMessage & "'; </script>")
end if
%>
- 下载图片,下载文件
- 文件下载
- 文件下载
- 文件下载
- 文件下载
- 文件下载
- 文件下载
- 下载文件
- 文件下载
- 下载文件
- 文件下载
- 文件下载
- 下载文件
- 文件下载
- 下载文件
- 下载文件
- 文件下载
- 下载文件
- asp.net上传图片生成缩略图
- linux ko 导出函数 出现unknown symbols
- android 工程中的 R.java 文件丢失后 ---如何重新生成
- 在LinQ中使用DateDiff
- Dundas Chart里面透明色
- 文件下载
- SQLite入门与分析(一)---简介
- 微软Windows Live Hotmail加入Silverlight相册
- java (Swing)的各种消息框
- VS2008 fatal error C1902: 程序数据库管理器不匹配;请检查安装
- WPF 动态加载usercontrol
- Asp.Net中String.Empty、null和""的区别
- lamn环境源码编译
- 网游运营中的外挂与bug处理模式