8.7w+
社区成员
浏览器下载问题，JAVASCRIPT能不能实现
如何实现下载非。RAR；。ZIP文件，通常点击左键出现的是文件打开后的内容，例如TXT；WMV。怎么实现直接就可以下载不打开。JAVASCRIPT能解决吗。我所做的并非B/S系统。希望实现不会用到ASP，JSP。
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
meizz 2004-11-10
- 打赏
- 举报
download.asp:
<%@ Language=VBScript codepage=936 %>
<% Option Explicit %>
<%
Dim filePath, dataStream, BytesStream
filePath = request.queryString("path")
set BytesStream = server.createobject("ADODB.Stream")
With BytesStream
.Open
.Type = 2
.LoadFromFile filePath
dataStream = .Readtext
.Close
End With
set BytesStream=nothing
Response.AddHeader "content-disposition","attachment; filename="+ Mid(filePath, InStrRev(filePath, "\")+1)
Response.ContentType="application/octet-stream"
Response.BinaryWrite dataStream
%>
<a href="download.asp?path=D%3A%5CWebhosting%5CClients%5Cmeizz%5Cwwwroot%5CIndex%2Ehtm">
<%@ Language=VBScript codepage=936 %>
<% Option Explicit %>
<%
Dim filePath, dataStream, BytesStream
filePath = request.queryString("path")
set BytesStream = server.createobject("ADODB.Stream")
With BytesStream
.Open
.Type = 2
.LoadFromFile filePath
dataStream = .Readtext
.Close
End With
set BytesStream=nothing
Response.AddHeader "content-disposition","attachment; filename="+ Mid(filePath, InStrRev(filePath, "\")+1)
Response.ContentType="application/octet-stream"
Response.BinaryWrite dataStream
%>
<a href="download.asp?path=D%3A%5CWebhosting%5CClients%5Cmeizz%5Cwwwroot%5CIndex%2Ehtm">
zl13 2004-11-10
- 打赏
- 举报
没听说过，帮你顶