当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > ASPX保存远程图片到本地的两种方法的函数

ASP.NET
在ASP.NET中进行文件处理(1)
ASP.NET的实时天气及24小时天气预报
ASP.NET画图全攻略(上)
ASP.NET画图全攻略(下)
ASP.NET学习篇(1)——开篇
ASP.NET学习篇(2)——安装与配置
ASP.NET学习篇(3)——几个简单的ASP.ENT的例子
ASP.NET学习篇(4)——服务器端的控件
ASP.NET立即上手教程(1)
ASP.NET立即上手教程(2)
ASP.NET立即上手教程(3)
ASP.NET立即上手教程(4)
ASP.NET立即上手教程(5)
ASP.NET立即上手教程(6)
ASP.NET立即上手教程(8)
ASP.NET立即上手教程(7)
ASP.NET立即上手教程(9)
ASP.NET立即上手教程(10)
ASP.NET立即上手教程(11)
ASP.NET立即上手教程(12)

ASP.NET 中的 ASPX保存远程图片到本地的两种方法的函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 100 ::
收藏到网摘: n/a

FunctionUpRemoteFileToLocal(ByValUpTypeAsString,ByValRemoteUrlAsString,ByValLocalFileAsString)AsBoolean
DimTmpResultAsBoolean=False
SelectCaseUpType
Case"xmlhttp"
'WithMSXML2
DimmyXmlHttpAsNewMSXML2.XMLHTTP40
myXmlHttp.open("GET",RemoteUrl,False)
myXmlHttp.send()
DimFSAsFileStream=NewFileStream(LocalFile,FileMode.CreateNew)
DimBWAsBinaryWriter=NewBinaryWriter(FS)
BW.Write(myXmlHttp.responseBody)
BW.Close()
FS.Close()
TmpResult=True
Case"webclient"
'WithSystem.NetNameSpace
DimmyWebClientAsNewWebClient
myWebClient.DownloadFile(RemoteUrl,LocalFile)
TmpResult=True
EndSelect
EndFunction