最近有个需求,需要用asp代码,根据提供的URL来下载文件并保存到服务器指定文件夹里,这个怎么实现呢,求高手路过过来提点下啊
ASP
下载
------解决方案--------------------
ASP下载远程图片保存到本地
------解决方案--------------------
人家asp啊。。。你们发.net代码做什么。。。
msxml.serverxmlhttp组件,获取到responseBody直接用adodb.stream以二进制的形式写入文件
------解决方案--------------------
Function TransferFile(path, mimeType, filename)
' 下面是不希望下载的文件
FileExt = Mid(filename, InStrRev(filename, ".") + 1)
Select Case UCase(FileExt)
Case "ASP", "ASA", "ASPX", "INC"
Response.Write "受保护文件,不能下载."
Response.End
End Select
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