您的位置:首页技术开发ASP 学院 → ASP保存远程文件到本地(实用版)

ASP保存远程文件到本地(实用版)

时间:2009/11/10 11:55:00来源:本站整理作者:我要评论(0)

<%
Function SaveRemoteFile(LocalFileName,RemoteFileUrl)
    SaveRemoteFile=True
dim Ads,Retrieval,GetRemoteData
Set Retrieval = Server.CreateObject("Microsoft.XMLHTTP")
With Retrieval
   .Open "Get", RemoteFileUrl, False, "", ""
   .Send
        If .Readystate<>4 then
            SaveRemoteFile=False
            Exit Function
        End If
   GetRemoteData = .ResponseBody
End With
Set Retrieval = Nothing
Set Ads = Server.CreateObject("Adodb.Stream")
With Ads
   .Type = 1
   .Open
   .Write GetRemoteData
   .SaveToFile server.MapPath(LocalFileName),2
   .Cancel()
   .Close()
End With
Set Ads=nothing
End Function
%>

<%
'以下为调用示例:
remoteurl="http://www.uyux.cn/logo.gif"'远程文件名(绝对全路径)
localfile=Replace(Replace(Replace(Now(),"-","")," ",""),":","")&Right(remoteurl,4)'本机文件名(可自定义)
If SaveRemoteFile(localfile,remoteurl)=True Then
Response.Write("成功保存:"&localfile)
End If
%>

-

资料引用:http://www.knowsky.com/532629.html

相关视频

    没有数据

相关阅读 ASP获取到的系统时间有上午,下午的解决方法图解狂野飙车8无限 Asphalt 8:Infinity首度曝光ASP中常用的文件处理函数asp下面javascript上传图片限制格式大小方法ie6下面asp.net mvc3 部署应用程序ASP网站安装不成功的解决办法asp的日期转换星座函数快速掌握ASP连接11种数据库的常用语法

文章评论
发表评论

热门文章 没有查询到任何记录。

最新文章 127.0.0.1 需要输入用Microsoft JET Databa ASP木马密码加密的破解方法Asp中文件上传,fso方法大全js报错 抛出例外解决方法-适用于ecshop 调用127.0.0.1 需要输入用户名密码的解决方法

人气排行 教你如何用ASP生成HTML静态网页127.0.0.1 需要输入用户名密码的解决方法编写简单ASP代码测试WEB服务器环境asp用户登录模块实例代码ASP保存远程文件到本地(实用版)js报错 抛出例外解决方法-适用于ecshop 调用如何调试ASP的环境ASP.NET中MVC框架模式方法如何实现分享