怎样在asp中写下载页面的代码啊?高手帮帮忙,急

在html页面中用<a>标签就可以了,但是我用asp不知道怎么样写?我在html中是这样写的<ahref="123.rar">下载</a>我在asp中写时放在了标记外面,... 在html页面中用<a>标签就可以了,但是我用asp不知道怎么样写?
我在html中是这样写的
<a href="123.rar">下载</a>
我在asp中写时放在了标记外面,可是测试时,123.rar总会在地址栏出现,无法找到页面
我是想做.mp3文件下载
展开
 我来答
196231222
2007-12-24 · TA获得超过584个赞
知道小有建树答主
回答量:562
采纳率:0%
帮助的人:199万
展开全部
连接地址:
<a href=down.asp?filename=/upfile/<%=rs("filename")%>><%=rs("file")%></a>

注意;upfile是文件夹名。<%=rs("filename")%>是读取的字段名。

上一个页面传过来的信息:新建一个。down.asp
<%
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
%>

哈哈!搞定要加分。。。。
devil_1024
2007-12-19 · TA获得超过320个赞
知道小有建树答主
回答量:599
采纳率:0%
帮助的人:655万
展开全部
<a href="123.rar">下载</a>
这样写就可以,找不现页面可能是因为当前目录下没有123.rar文件

如果是图片或是网页文件是下载不了的。看你的扩展名。
-------------------
能不能把网页代码发一下。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友fe63ddb7a
2007-12-19 · TA获得超过222个赞
知道小有建树答主
回答量:519
采纳率:0%
帮助的人:243万
展开全部
<%response.write "<a>"%>
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式