如何用ASP实现文件下载?
发布网友
发布时间:2022-04-27 08:44
我来回答
共3个回答
热心网友
时间:2022-04-27 10:14
调用
response.Write("<a href=down.asp?filename="&UpLoadPath&ls_array(i+1)&">"&ls_array
(i)&"</td></tr>")
down.asp文件内容如下:
<%
Const FilePath = "UploadFile/" '文件存放路径
From_url = Cstr(Request.ServerVariables("HTTP_REFERER"))
Serv_url = Cstr(Request.ServerVariables("SERVER_NAME"))
Function GetFileName(longname)'/folder1/folder2/file.asp=>file.asp
while instr(longname,"/")
longname = right(longname,len(longname)-1)
wend
GetFileName = longname
End Function
Dim Stream
Dim Contents
Dim FileName
Dim TrueFileName
Dim FileExt
Const adTypeBinary = 1
FileName = Request.QueryString("FileName")
if FileName = "" Then
Response.Write "无效文件名!"
Response.End
End if
FileExt = Mid(FileName, InStrRev(FileName, ".") + 1)
Response.Clear
if lcase(right(FileName,3))="gif" or lcase(right(FileName,3))="jpg" or lcase(right(FileName,3))="png" then
Response.ContentType = "image/*" '对图像文件不出现下载对话框
else
Response.ContentType = "application/ms-download"
end if
Response.AddHeader "content-disposition", "attachment; filename=" & GetFileName(Request.QueryString("FileName"))
Set Stream = server.CreateObject("ADODB.Stream")
Stream.Type = adTypeBinary
Stream.Open
TrueFileName= FilePath &FileName
Response.Write TrueFileName
Response.End
Stream.LoadFromFile Server.MapPath(TrueFileName)
While Not Stream.EOS
Response.BinaryWrite Stream.Read(1024 * 64)
Wend
Stream.Close
Set Stream = Nothing
Response.Flush
Response.End
%>
热心网友
时间:2022-04-27 11:32
很简单,把文件放在指定的目录下就行了,如下:
根目录:<a href="1.rar" >下载</a>
别的目录,如: Download 用这样 <a href="Download/1.rar" >下载</a>
热心网友
时间:2022-04-27 13:06
你的代码是怎么样的呢,你直接指向那个rar文件的地址就可以下载的啦,如果你本地可以,网上不行的话,估计是配置问题
如何用ASP实现文件下载?
down.asp文件内容如下:< Const FilePath = "UploadFile/" '文件存放路径 From_url = Cstr(Request.ServerVariables("HTTP_REFERER"))Serv_url = Cstr(Request.ServerVariables("SERVER_NAME"))Function GetFileName(longname)'/folder1/folder2/file.asp=>file.asp while instr(longname,"/")longn...
如何把doc文件转换成PDF格式?
"1.当然可以,首先要确定自己有一个pdf文档,而且确定目的是需要将pdf文档转换为word格式,然后我们将现有文档通过迅捷pdf转换器软件打开。2.通过选择PDF转换页面功能其中的PDF文件转WORD项目拖入文件。3.接着在迅捷pdf转换器下方按自己的需要是否更改文件名,然而在保存类型中选择*.doc选项。4.全部设置完成点击开始转换,确定自己设置好路径、更改文件名和保存类型即可。5.转换完成之后的word文档同样可以通过迅捷pdf转换器重新转换成一开始的pdf文档。"1.当然可以,首先要确定自己有一个pdf文档,而且确定目的是需要将pdf文档转换为word格式,然后我们将现有文档通过迅捷pdf转换器软件打开。2.通过选择PDF转换页面功能其中的PDF文件转WORD项目拖入文件。3.接着在迅捷pdf转换器下方按自己的需要是...
ASP 如何实现文件下载
你把要下载的文件名传到下载页面,用request("fileNameField")获取文件名 下面这地方改一下 iConcStr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False" & _";Data Source=" & server.mappath(request("fileNameField"))点击下载的地方用下载文件 这个 ...
asp.net 如何实现下载功能?详细点最好 文件上传功能已实现 QQ:35181777...
下载:方法一:点击下载 方法二:前台加一个按钮控件:<asp:Button ID="btnDownLoad" runat="server" Text="文件下载" OnClick="btnDownLoad_onclick" /> 后台写按钮事件btnDownLoad_onclick:protected void btnDownLoad_onclick(object sender, EventArgs e){ try { string mapPath = Server.MapPat...
asp.net 如何实现将服务器上的文件下载到本地?
string fileURL = this.Server.MapPath("你要下载的文件路径");//文件路径,可用相对路径 FileInfo fileInfo = new FileInfo(fileURL);Response.Clear();Response.AddHeader("content-disposition", "attachment;filename=" + Server.UrlEncode(fileInfo.Name.ToString()));//文件名 Response.AddHeade...
ASP如何写文件下载代码
直接发送下载的代码,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 =...
解析:如何在 ASP.NET 中下载文件
典型的状况是,我们要让用户下载一个.txt文件,或是.csv格式的Excel文件,但是... 1. 这个文件可能是通过ASP.NET程序动态产生的,而不是确实存在于Server端的文件; 2. 或是它虽然存在于伺服器端的某个实体位置,但我们并不想暴露这个位置(如果这个位置公开,很可能没有权限的用户也可以在网址栏上输...
如何实现在网站的文件上传和下载功能?
1、如何解决文件上传大小的限制2、以文件形式保存到服务器3、转换成二进制字节流保存到数据库以及下载方法4、上传Internet上的资源第一部分: 首先我们来说一下如何解决ASP.NET中的文件上传大小限制的问题,我们知道在默认情况下ASP.NET的文件上传大小限制为2M,一般情况下,我们可以采用更改WEB.Config文件来自定义最大...
asp.net (c#)下载文件,能直接点下载,然后选择你要下载的文件 谁能传...
下载是自己做出来的,没有专门下载的按钮,就是fileupload空间你也要对他进行编程后才能实现上传的功能,教你一个最简单的下载例子,在html里面下载的文件名字,就用这个超链接就能实现下载功能了
如何在asp.net中实现点击下载按钮进行文件下载?
private void ResponDown(string fileName,string filepatch){ Response.Clear();Response.ClearHeaders();Response.Buffer = false;Response.ContentType = "application/ms-excel";Response.AppendHeader("Content-Disposition", "attachment;filename=" + HttpUtility.UrlEncode(fileName, System.Text.Encoding...
ASP.NET中,文件下载模块,怎么实现下载次数?用户下载一次,下载次数就加 ...
在数据库相关表中新增一个字段,假设为SUM1,初值为0 在下载成功时执行下面的语句 update table set SUM1=SUM1+1