高考问答英雄联盟大招怎么用:ASP如何写文件下载代码
来源：百度文库 编辑：高考问答 时间：2024/05/09 17:08:49
1、怎么样实现不用单击“下载文件”就可以自动跳转到下载页面然后下载。比如aaa.asp?id=12我要下载ID为12这个地址的文件。我只会写成<a href='aaa.asp?id=12'>单击下载</a>
2、我做的网站，只能右键另存为，这样下载。而且MP3，WMA这样的文件一点直接就开启本地的播放器播放了。并不下载。还要右键另存。有一些比如OGG文件压根不播放，也不下载。请问这部分代码怎么写。关键语句就行。
直接发送下载的代码,
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = 1
objStream.LoadFromFile filename
Select Case lcase(Right(filename, 4))
Case ".asf"
ContentType = "video/x-ms-asf"
Case ".avi"
ContentType = "video/avi"
Case ".doc"
ContentType = "application/msword"
Case ".xls"
ContentType = "application/vnd.ms-excel"
Case ".gif"
ContentType = "image/gif"
Case ".jpg", "jpeg"
ContentType = "image/jpeg"
Case ".wav"
ContentType = "audio/wav"
Case ".mp3"
ContentType = "audio/mpeg3"
Case ".mpg", "mpeg"
ContentType = "video/mpeg"
Case ".rtf"
ContentType = "application/rtf"
Case ".htm", "html"
ContentType = "text/html"
Case ".txt"
ContentType = "text/plain"
Case Else
ContentType = "application/octet-stream"
End Select
Response.AddHeader "Content-Disposition", "attachment; filename=" & shortName
Response.AddHeader "Content-Length", fileSize
Response.Charset = "UTF-8"
Response.ContentType = ContentType
Response.BinaryWrite objStream.Read
Response.Flush
response.Clear()
objStream.Close
Set objStream = Nothing
1.<body onload="window.open('aaa.asp?id=12')">
2.要想点击mp3链接打开下载，需要客户端机器进行相当的设置，而不是在代码上（至少我没见过），你没看过一些做媒体文件的网站在链接旁边都用红色文字标着“要下载文件，你必须用用右键另存为”吗？要是可以用代码实现下载的话，这些网站就不用这样做了！
会了其实很简单的
有傻瓜教程 自己看吧
http://mikk.go1.icpcn.com/ip.txt