VBA自学应用（6）——URLDownloadToFile下载图片

最新推荐文章于 2023-06-01 12:16:01 发布

star星梦

最新推荐文章于 2023-06-01 12:16:01 发布

阅读量3.1k

点赞数 2

分类专栏： VBA自学应用

本文链接：https://blog.youkuaiyun.com/qq_24818403/article/details/103794764

版权

VBA自学应用专栏收录该内容

18 篇文章

订阅专栏

Private Declare Function URLDownloadToFile Lib "urlmon" Alias _
"URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, _
ByVal szFileName As String, ByVal dwReserved As Long, _
ByVal lpfnCB As Long) As Long
Sub test()
    'URLDownloadToFile(0, "网页地址", "保存到本地文件名和地址", 0, 0)
    Call URLDownloadToFile(0, _
    "http://inews.gtimg.com/newsapp_bt/0/11084888376/1000.jpg" _
    , "D:\美女图.png", 0, 0)
End Sub