asp 文件下载代码

最新推荐文章于 2025-10-03 23:46:36 发布
原创 最新推荐文章于 2025-10-03 23:46:36 发布 · 2k 阅读 · 0 ·
本内容遵循CC 4.0 BY-SA版权协议
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
标签
#asp #function #session #浏览器 #flash
#html
本文介绍了一种使用ASP技术实现在线播放音乐文件的方法。通过创建ADODB.Stream对象并以二进制方式读取MP3文件，然后将其输出到客户端浏览器中进行播放。此外，还提供了常见ContentType类型与文件扩展名之间的映射关系。
filepath = "/music/2006522133342.mp3"
filepath = server.mappath(filepath)
    Response.buffer = True            '开启缓存
    Response.ContentType = "audio/x-pn-realaudio"      ‘文件类型    
    Dim objStream
    Set objStream = Server.CreateObject("ADODB.Stream")        '创建ADODB.stream对象
    objStream.Type = 1        '以二进制读取模式
    objStream.Open
    objStream.LoadFromFile filepath    '读取文件
    Response.binarywrite objStream.Read            '以二进制的方式输出至客户端浏览器
    response.Flush()        '边缓存边输出
    Session("afon")=false        '重新设置session为FALSE        
    objStream.Close
    Set objStream = Nothing    

附常见的contenttype类型

<% 
Function Get_FileTypeAbName(sFileType)
      select case sFileType
 '图像类
        Case  "image/gif" 
            Get_FileTypeAbName="gif"
            exit function
        Case  "image/pjpeg" 
            Get_FileTypeAbName="jpg"
            exit Function
        Case  "image/bmp" 
            Get_FileTypeAbName="bmp"
            exit Function
        Case  "image/png" 
            Get_FileTypeAbName="png"
            exit Function
        Case "image/tif"
            Get_FileTypeAbName="tif"
            Exit Function
'音频类  
        Case "audio/mpeg"
            Get_FileTypeAbName="mp3"
            Exit Function
        Case "audio/x-ms-wma"
            Get_FileTypeAbName="wma"
            Exit Function
        Case "audio/mid"
            Get_FileTypeAbName="mid"
            Exit Function
        Case "audio/wav"
            Get_FileTypeAbName="wav"
            Exit Function
'视频类
        Case "application/vnd.rn-real media"
            Get_FileTypeAbName="rm"
            Exit Function
        Case "video/x-ms-wmv"
            Get_FileTypeAbName="wmv"
            Exit Function
'flash
        Case "application/x-shockwave-flash"
            Get_FileTypeAbName="swf"
            Exit Function
'压缩软件类
        Case "application/x-zip-compressed"
            Get_FileTypeAbName="zip"
            Exit Function
        Case "application/octet-stream"
            Get_FileTypeAbName="rar"
            Exit Function 
'文本类  
        Case "text/plain"
            Get_FileTypeAbName="txt"
            Exit Function 
        Case "text/html"
            Get_FileTypeAbName="html"
            Exit Function 
        Case "application/msaccess"
            Get_FileTypeAbName="mdb"
            Exit Function 
        Case "application/msword"
            Get_FileTypeAbName="doc"
            Exit Function
        Case "application/vnd.ms-excel"
            Get_FileTypeAbName="xls"
            Exit Function
     end select
End Function
%>

 

ASP实现文件下载功能的代码,.txt
12-15
ASP实现文件下载功能的代码,.txtASP实现文件下载功能的代码,.txt
asp文件的下载源代码
07-06
asp文件的下载源代码，介绍了两种asp文件下载的方法
asp 点击链接 下载图片文件
weixin_30410999的博客
05-07 270
<%Dim StreamDim ContentsDim FileNameDim FileExtConst adTypeBinary = 1FileName = Request.QueryString("FileName")if FileName = "" Then Response.Write "无效文件名." Response.EndEnd if' 下面是不希望下载的文件Fil...
asp实现文件上传下载功能
m0_46504784的博客
04-07 829
请注意，以上示例中的路径和文件名需要根据实际情况进行修改。另外，文件上传和下载功能需要在支持asp的服务器环境中运行。asp可以实现文件上传和下载功能。下面是一个简单的示例来演示如何使用asp实现文件上传和下载简单功能。
ASP 文件下载实例
qiufengwuxiu的博客
01-09 6401
点击下载的地方跳转： target=print_blank>下载附件 新建一个Downdoc.ASP文件，代码如下 dim id dim upload_name,upload_url if not isempty(request("docs_id")) then     id=cint(request("docs_id"))   sql="select * fr
NET四种文件下载方式
信守承诺,雕刻寂寞
09-11 835
 protected void Button1_Click(object sender, EventArgs e)    {        //TransmitFile实现下载        /*         微软为Response对象提供了一个新的方法TransmitFile来解决使用Response.BinaryWrite         下载超过400mb的文件时导致Aspnet_w
asp实现jpg、txt、html文件直接下载
weixin_33736048的博客
11-25 184
今天有网友向我求助，希望解决在asp实现jpg、txt、html文件直接下载的难题，同时希望有详细的asp代码。我们都清楚，如果在网页中下载jpg格式文件会通过IE自动打开的，无法实现点击下载jpg文件，txt、html、asp等文件也是一样IE会自动打开，如何在asp实现jpg、txt、html文件直接下载呢，这个代码又怎么写呢，下面是从学无忧转载过来的几种程序代码及使用方法： 一、程序代码 ...
ASP.NET下载文件代码
c370141743的专栏
03-16 882
<br />如何通过ASP.NET来下载文件，这个问题我们经常遇到，把常用的方法总结到一起，学习学习。当我们要让用户下载一个文件，最简单的方式是通过Response.Redirect指令：<br />Response.Redirect("test.doc")<br /><br />您可以把上面这行指令放在Button的Click事件当中，当用户点击按钮之后，网页就会被转址到该word档，造成下载的效果。<br />但是这样的下载有几个问题：<br />1、无法下载不存在的文件：例如，我们若是想把程序动态(临
ASP文件下载代码
Rock
11-16 2134
Dim StreamDim ContentsDim FileNameDim FileExtConst adTypeBinary = 1FileName=Request.QueryString("FileName")if FileName = "" ThenResponse.Write "无效文件名."Response.EndEnd if 下面是不希望下载的文件FileExt = Mid(File
asp.net下载大文件代码
weixin_34281537的博客
06-28 509
public void Down(string filepath, HttpResponse aResponse) { System.IO.Stream iStream = null; // Buffer to read 10K bytes in chunk: byte[] buff...
ASP实现文件直接下载的代码
01-02
<%@ language=vbscript codepage=65001%> <% ‘Filename must be input if Request(“Filename”)=”” then response.write “<h1>Error:</h1>Filename is empty!<p>” else call downloadFile(replace(replace(Request(“Filename”),”\”,””),”/”,””)) Function downloadFile(strFile) ‘ make sure you are on the latest MDAC ver
asp中使用流方式下载文件的代码
做最好的自己
05-03 5029
将下面的内容存成download.asp  然后你就可以用download!  来下载了!  ------------------------------------------------------------  Response.Buffer  =  true  Response.Clear              dim  url             Dim  fso,fl,flsi
ASP实现点击链接直接下载文件
chinmo的收藏
03-21 7457
ASP实现点击链接直接下载文件        在ie中点开图片或文档的链接里，IE会自动打开它,有时候这种功能并不是我们所需的,虽然我们可以提醒用户用鼠标右键--
[转]asp.net文件下载方法...
weixin_30535913的博客
11-16 173
TransmitFile实现下载 protected void Button1_Click(object sender, EventArgs e) { /* 微软为Response对象提供了一个新的方法TransmitFile来解决使用Response.BinaryWrite 下载超过400mb的文件时导致Aspnet_wp.e...
简短ASP下载文件
最新发布
m0_70077690的博客
10-03 195
【代码】简短ASP下载文件。
ASP使用流输出文件下载
武云Blog
11-09 1163
 ASP使用流输出文件下载   下载文件    function downloadfile(fullpath)        downloadfile = false        dim strfilename, s, fso, f, intfilelength         set fso = server.createobject("scripting.filesystemobj
将网站全部下载下来的ASP代码
铭心工作室
04-20 915
Description: A script that downloads files from a remote web server to a local mirror site (you can use it for just downloading files to anywhere you want...) Script: ****************************
asp_下载文件与读取ip地址
u010909858的专栏
11-27 521
下载文件的实现：                  下载Back.rar//直接将压缩文档防止项目中，拖拽进来即可实现         下载 新建文本文档.txt//按照上面的方式，不能讲文本文档实现下载功能，单击下载后实现的是直接查看文档         下载 新建文本文档DownloadFile.ashx//为了实现上面不能实现的功能             DownL
评论 1
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
表情包 代码片
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值