为什么链接无法下载?

2007-04-19 12:21:34 461 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Qt 侧边菜单栏+堆叠窗口stackedWidget 效果如下：环境：Qt 6.6.2 MSVC2019 64bit。阅读详情

服务器上有".txt",".000"两种后缀名的文件,我在网页上做了一个链接给用户下载这些文件文件,但是后缀名为txt的能下载,000的却提示"IE浏览器无法下载,请求的站点不可用,或找不到".已确认链接完全一样,只有文件后缀名不同.系统为2003.麻烦各位指教

...全文

Linux -- 图形界面配置Samba；system-config-samba工具图形界面配置Samba6.6.1 system-config-sambasystem-config-samba是Red Hat公司专门为Samba服务器管理编写的图形界面的管理工具，通过system-config-samba几乎可以完成对Samba服务器的所有配置，所以在只希望通过Samba服务器实现一些简单的资源共享时，system-config-samba是一个不错的选... 阅读详情

lt168

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

lt168 2007-04-19

打赏
举报

那应该怎么设置才能下载呢?

zhlym 2007-04-19

打赏
举报

第一：.txt文件是IE可以直接打开的，固不能直接点下载，要么压成RAR，要么自己写代码强行下载，

第二：.000估计是空间不可识别的文件名后缀，就像有些空间不能直接下载.exe文件一样

xie_yanke 2007-04-19

打赏
举报

.000也许被认为是temp文件吧.

lt168 2007-04-19

打赏
举报

感谢楼上的兄弟,解决了,结贴

zyz5361865 2007-04-19

打赏
举报

嘿嘿..我告诉你怎么办..
打开-----Internet 信息服务(IIS)管理器-------右键点击你的网站属性--------HTTP头-------MIME类型---------然后新建一个,输入你的文件后缀类型就可以了..
上BAIDU搜索一下相关MIME类型的文章....

lt168 2007-04-19

打赏
举报

我想直接右键点击链接,目标另存为来下载可以吗?怎么做

zhlym 2007-04-19

打赏
举报

N前收集的强行下载TXT方法，自己测试下

<%
Const ForReading=1
Const TristateTrue=-1 'Unicode
Const FILE_TRANSFER_SIZE=16384 '16k

'Use the following line for IIS4/PWS - this is the default for IIS5
Response.Buffer = True

Function TransferFile(path, mimeType, filename)
Dim objFileSystem, objFile, objStream
Dim char
Dim sent
send=0
TransferFile = True

Set objFileSystem = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = objFileSystem.GetFile(Path)
Set objStream = objFile.OpenAsTextStream(ForReading, TristateTrue)

Response.AddHeader "content-type", mimeType
response.AddHeader "Content-Disposition","attachment;filename="&filename
Response.AddHeader "content-length", objFile.Size

Do While Not objStream.AtEndOfStream
char = objStream.Read(1)
Response.BinaryWrite(char)
sent = sent + 1
If (sent MOD FILE_TRANSFER_SIZE) = 0 Then
Response.Flush
If Not Response.IsClientConnected Then
TransferFile = False
Exit Do
End If
End If
Loop

Response.Flush
If Not Response.IsClientConnected Then TransferFile = False

objStream.Close
Set objStream = Nothing
Set objFileSystem = Nothing
End Function

Dim path, mimeType, sucess
'Server.MapPath(path)
path = "C:\Inetpub\wwwroot\help.txt"
mimeType = "application/x-msdownload"
sucess = TransferFile(path, mimeType,"help.txt")
Response.End
%>

为什么链接无法下载?

相关推荐