📄 downfile.asp
字号:
<!--#include file="../include/opendb.asp"-->
<%
set conn=opendb()
Set rs=Server.CreateObject("ADODB.recordset")
sql="select fileContentType,filename,filevalue from a_liuchengbeifeng where id=" & trim(request("id"))
rs.open sql,conn,1,1
'清空缓存
Response.Clear()
'设置文件格式
Response.AddHeader "Content-Type",rs("fileContentType")
'设置文件名,不加attachment就不会保存,只会将一些文件内容显示在页面中
Response.AddHeader "Content-Disposition","attachment;filename="&rs("filename")
'输出文件内容
Response.BinaryWrite rs("filevalue").getChunk(7500000)
'结束
Response.End()
rs.close
set rs=nothing
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -