社区
ASP
帖子详情
谁做过这样的下载系统,用户可以把各类文件(word文档、JPG等及EXE可执行文件)上传到服务器,并在另一页可以按类型提供下载功能。
wxr9999
2003-10-16 06:02:40
谁做过这样的下载系统,用户可以把各类文件(word文档、JPG等及EXE可执行文件)上传到服务器,并在另一页可以按类型提供下载功能。
...全文
58
17
打赏
收藏
谁做过这样的下载系统,用户可以把各类文件(word文档、JPG等及EXE可执行文件)上传到服务器,并在另一页可以按类型提供下载功能。
谁做过这样的下载系统,用户可以把各类文件(word文档、JPG等及EXE可执行文件)上传到服务器,并在另一页可以按类型提供下载功能。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
17 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
超级大笨狼
2004-01-16
打赏
举报
回复
下载任何文件(尤其是IE关联打开的)
第一个文件连接处这么写
<a name="download"
href="<%if 是会员 then response.write "download.asp?filename=" & myfilename%>">
下载<%=myfilename%></a>
第二个文件:
<%
Dim Stream
Dim Contents
Dim FileName
Dim FileExt
Const adTypeBinary = 1
FileName = Request.QueryString("FileName")
if FileName = "" Then
Response.Write "无效文件名."
Response.End
End if
' 下面是不希望下载的文件
FileExt = Mid(FileName, InStrRev(FileName, ".") + 1)
Select Case UCase(FileExt)
Case "ASP", "ASA", "ASPX", "ASAX", "MDB"
Response.Write "受保护文件,不能下载."
Response.End
End Select
' 下载这个文件
Response.Clear
Response.ContentType = "application/octet-stream"
Response.AddHeader "content-disposition", "attachment; filename=" & FileName
Set Stream = server.CreateObject("ADODB.Stream")
Stream.Type = adTypeBinary
Stream.Open
Stream.LoadFromFile Server.MapPath(FileName)
While Not Stream.EOS
Response.BinaryWrite Stream.Read(1024 * 64)
Wend
Stream.Close
Set Stream = Nothing
Response.Flush
Response.End
%>
fenlin
2004-01-12
打赏
举报
回复
kent233@sohu.com
要一份,谢谢
jfly301
2004-01-12
打赏
举报
回复
jfly301@hotmail.com
看看
oliver007
2004-01-12
打赏
举报
回复
uuuut@21cn.com
多谢
simon810610
2004-01-12
打赏
举报
回复
ygnygn@163.net我也要一份,谢谢!
yuqun
2003-10-20
打赏
举报
回复
yuqun@168com.net
也给我一个吧 多谢
wxr9999
2003-10-20
打赏
举报
回复
非常感谢啊!!!
mail: zx1966@sohu.com
iinohk
2003-10-17
打赏
举报
回复
我做過…
問題不過在上傳文件而已,基本沒什麼難道,用心的話菜鳥也一定做到
srj911
2003-10-17
打赏
举报
回复
关注中,顶
zhljsdly
2003-10-17
打赏
举报
回复
是不是上传到服务器然后再自动压缩啊,不明白
wxr9999
2003-10-17
打赏
举报
回复
一个上载系统。
qunluo
2003-10-17
打赏
举报
回复
qun-luo@163.com
pengzan
2003-10-17
打赏
举报
回复
我有,留个信箱吧
qdubit
2003-10-17
打赏
举报
回复
关注!
yhncom_36
2003-10-16
打赏
举报
回复
你的意思就是任意文件的上传吗!
xupiao
2003-10-16
打赏
举报
回复
不太明白你的意思
按文件名分類保存在一個表中
wxr9999
2003-10-16
打赏
举报
回复
up.
WORD电子签名插件V1.2
插入签名或签章后,可以监控
WORD文档
是否被修改。软件的使用界面很简单,只是在WORD里插入了一个工具栏,上面有三个按钮。其它的
功能
在插入的签名或签章上按右键根据弹出菜单选择执行。 印章支持多种格式图片,如...
vc++ 应用源码包_1
这个例子就是查询任何
可执行
文件
的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! GMem 内存管理单元源码。GMem.cpp和GMem.h是内存管理...
史上最全的Linux常用命令汇总(送Linux常用命令
word文档
)
linux的命令很多,但最常用的命令大致可以分为:
系统
命令,
用户
命令,网络命令等。我们把最常用的命令按照16个分类整理成一个
word文档
,作为本课程的课件。linux的命令已经全部整理完成,放在本课程的课件中。大家购买课程后,可以直接
下载
课件。大家可以点击下面的第一个视频,查看课件的内容。其他课程视频正在录制中,后续会全部录制完成。
vc++ 应用源码包_2
这个例子就是查询任何
可执行
文件
的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! GMem 内存管理单元源码。GMem.cpp和GMem.h是内存管理...
vc++ 应用源码包_6
这个例子就是查询任何
可执行
文件
的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! GMem 内存管理单元源码。GMem.cpp和GMem.h是内存管理...
ASP
28,390
社区成员
357,068
社区内容
发帖
与我相关
我的任务
ASP
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
复制链接
扫一扫
分享
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章