首页 > Windows开发 > 详细

VBS通过WinHttp对象下载网页图片。

时间:2020-03-12 13:45:31      阅读:162      评论:0      收藏:0      [点我收藏+]
我刚才写了一个vbs脚本,该脚本通过调用com组件winhttp来获取网页中图片的数据,并且以二进制数据的形式返回。
再通过adodb.steam对象将二进制数据保存为图片文件。

Sub DownloadPic(url,strPath)
    Set Winhttp = CreateObject("WinHttp.WinHttpRequest.5.1") 
    Winhttp.Open "GET", url
    Winhttp.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded" 
    Winhttp.Send

    Set sGet = CreateObject("ADODB.Stream")
    sGet.Mode = 3
    sGet.Type = 1
    sGet.Open()
    sGet.Write(Winhttp.ResponseBody)
    sGet.SaveToFile strPath
End Sub

在此将代码分享给大家。

VBS通过WinHttp对象下载网页图片。

原文:https://blog.51cto.com/181647568/2477546

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!