download.asp?file=相对路径的文件
就可以把这个文件下载下来
<%
2
3 call downloadFile(replace(replace(Request("file"),"\",""),"/",""))
4
5 Function downloadFile(strFile)
6 ' make sure you are on the latest MDAC version for this to work
7 ' -------------------------------------------------------------
8
9
10 ' get full path of specified file
11 strFilename = server.MapPath(strFile)
12
13
14 ' clear the buffer
15 Response.Buffer = True
16 Response.Clear
17
18 ' create stream
19 Set s = Server.CreateObject("ADODB.Stream")
20 s.Open
21
22 ' Set as binary
23 s.Type = 1
24
25 ' load in the file
26 on error resume next
27
28
29 ' check the file exists
30 Set fso = Server.CreateObject("Scripting.FileSystemObject")
31 if not fso.FileExists(strFilename) then
32 Response.Write("<h1>Error:</h1>" & strFilename & " does not exist<p>")
33 Response.End
34 end if
35
36
37 ' get length of file
38 Set f = fso.GetFile(strFilename)
39 intFilelength = f.size
40
41
42 s.LoadFromFile(strFilename)
43 if err then
44 Response.Write("<h1>Error: </h1>" & err.Description & "<p>")
45 Response.End
46 end if
47
48 ' send the headers to the users browser
49 Response.AddHeader "Content-Disposition", "attachment; filename=" & f.name
50 Response.AddHeader "Content-Length", intFilelength
51 Response.CharSet = "UTF-8"
52 Response.ContentType = "application/octet-stream"
53
54 ' output the file to the browser
55 Response.BinaryWrite s.Read
56 Response.Flush
57
58
59 ' tidy up
60 s.Close
61 Set s = Nothing
62
63
64 End Function
65
66 %>
当然,从安全方面着想,最好是不要把文件路径放在url中
分享到:
相关推荐
在浏览器的地址栏里直接输入一个doc或xls或jpg的文件的url路径,那么该文件会直接显示在浏览器里。而在很多时候我们希望能直接弹出下载提示框让用户下载,我们该怎么办呢?这里有两种方法: 1、设置你的服务器的...
前请先确保服务器支持ACCESS数据库(登陆用),FSO,ADODB.STREAM(文件上传)。 本程序系多用户程序,用户分为超级用户和普通用户两类。当以管理员身份登陆后可以添加用户,修改用户和删除用户。 系统初始...
运行环境:服务器需安装:雨哲树网组件(YuZheTreeWeb.dll)、Msxml2.ServerXMLHTTP组件、Microsoft.XMLHTTP组件、MSXML2.XMLHTTP组件、ADODB.Stream组件、Fso组件,后面四个组件一般服务器都自带。 雨哲树网程序是...
使用Xxasp文件上传提取系统您必须保证您的服务器满足如下要求: 1、软件系统:WIN2000+IIS5.0 / WINXP+IIS5.1 / WIN2003+IIS6.0 2、数 据 库:Access2000/MSSQL 3、FSO,ADODB.Stream 4、其 他:服务器必须安装 ...
还有下载使用要修改conn.asp里面的数据库路径(当然了数据名称也要修改) 2015年09月21日发布几个说明: 1、重新改写模板使之能兼容360浏览器、360极速浏览器、火狐浏览器、Google Chrome等主流浏览器 2、删除...
第一种方法:利用js的ADODB.Stream,将文件先转换成流,再通过js上传到服务器,这样有个好处就是可以上传超大文件,并且由于是数据流,可以支持断点续传、方便显示上传进度等人性化功能。唯一的缺点是要客户端...
11、文件在线编辑采用FSO与ADODB.Stream,双剑合壁,支持任何编码文件读取与保存。 12、文件夹在线打包、解包,可以打包下载网站文件。 13、简单方便明了的用户目录空间占用统计 使用说明: 1、本系统为...
'本程序只供在需要特别处理服务器文件时使用,严禁用于非法目的 '由于非正当使用本程序而造成的一切后果及责任自负 '版本: v0.12 '作者: 河北科技大学 rssn | Risingsun,Hebust 'QQ: 126027268 'E-mail: rssn@163....
3、FSO,ADODB.Stream 4、其他:服务器必须安装微软IE浏览器5.0或以上版本推荐:Windows2000+IIS5.0+Access2000+IE5.5环境测试 二、系统安装 如果您是第一次使用TopWangSourceShareSystem,在确认您同意拓网的版权...
·服务器支持ASP,FSO(文件可读写权限),部分需要支持xmlhttp组件、ADODB.STREAM组件,支持桌面数据库(专业版本用户需要支持SQLserver数据库) ·服务器脚本解释引擎:VBScript/5.6.8515或以上 ·客户端浏览器请使用IE...
☆程序要求:支持FSO和ADODB.STREAM ☆操作系统:Windows2000/XP/XP2(推荐) ☆文件系统:FAT32(NTFS不推荐,若使用这个文件系统,要执行写入权限) 软件下载功能! 会员管理功能,站内短信,站内留言讨论和个栏目...
1,连接数据库代码 文件名称 conn.asp 所有访问数据库的文件都调用此文件<!--#include file=\"Conn.asp\"--> db=\"data/data.mdb\" \'数据库存放目录 on error resume next set conn=server.createobject(\...
Javascript小技巧一箩筐 事件源对象 event.srcElement.tagName event.srcElement.type ... 捕获释放 event.srcElement.setCapture();...event.srcElement.releaseCapture();... 根据鼠标获得元素: document....
2、组件要求:Jmail邮件组件、aspjpeg水印组件、上传组件(aspupload组件)、FSO读写权限(IIS_IUSRS,IUSR帐号读写)、ADODB.Stream组件。一般的虚拟主机都有这些组件,如果是本地调试必须先检查一下IIS的设置环境...