360教程:是一个免费提供流行杀毒软件教程、在线学习分享的学习平台!

ASPX保存远程图片到本地的2种方法的函数

时间:2024/6/22作者:未知来源:360教程人气:

[摘要]Function UpRemoteFileToLocal(ByVal UpType As String, ByVal RemoteUrl As String, ByVal LocalFile As ...
Function UpRemoteFileToLocal(ByVal UpType As String, ByVal RemoteUrl As String, ByVal LocalFile As String) As Boolean
        Dim TmpResult As Boolean = False
        Select Case UpType
            Case "xmlhttp"
                'With MSXML2
                Dim myXmlHttp As New MSXML2.XMLHTTP40
                myXmlHttp.open("GET", RemoteUrl, False)
                myXmlHttp.send()
                Dim FS As FileStream = New FileStream(LocalFile, FileMode.CreateNew)
                Dim BW As BinaryWriter = New BinaryWriter(FS)
                BW.Write(myXmlHttp.responseBody)
                BW.Close()
                FS.Close()
                TmpResult = True
            Case "webclient"
                'With System.Net NameSpace
                Dim myWebClient As New WebClient
                myWebClient.DownloadFile(RemoteUrl, LocalFile)
                TmpResult = True
        End Select
    End Function





关键词:ASPX保存远程图片到本地的2种办法的函数




Copyright © 2012-2018 360教程(http://www.360sd.cn) .All Rights Reserved 网站地图 友情链接

免责声明:本站资源均来自互联网收集 如有侵犯到您利益的地方请及时联系管理删除,敬请见谅!

QQ:1006262270   邮箱:kfyvi376850063@126.com   手机版