VBA抓到的数据和fiddler里显示的不一样

zfswagger 2021-03-06 04:37:56

Sub test()
Dim WINHttp As Object, str$, Url$
For i = 1 To 3
Set WINHttp = CreateObject("winhttp.winhttprequest.5.1")
Url = "https://www.alibaba.com/product-detail/2020-Fashion-New-Design-Simple-Ins_1600070193884.html"
WINHttp.Open "GET", Url, False
WINHttp.setRequestHeader "Referer","https://www.alibaba.com/sw.jsv=2.13.21&_flasher_manifest_=https://s.alicdn.com/@xconfig/flasher_classic/manifest"
WINHttp.send

str = WINHttp.responsetext
Range("a" & i) = str
Debug.Print str

Next
End Sub



不知道里面有哪些错误,求大神指点迷津
...全文
230 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

2,462

社区成员

发帖
与我相关
我的任务
社区描述
VBA(Visual Basic for Applications)是Visual Basic的一种宏语言,是在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。
社区管理员
  • VBA
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧