VBA captured data and indicated in the fiddler-CodePudding

 
[align=left] Sub test () 
Dim WINHttp As Object, the 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 
The WINHttp. SetRequestHeader "Referer", "https://www.alibaba.com/sw.jsv=2.13.21& _flasher_manifest_=https://s.alicdn.com/@xconfig/flasher_classic/manifest "
The WINHttp. Send 

STR=WINHttp. The responsetext 
Range (" a "& amp; I)=STR 
The Debug. Print STR 

Next 
End Sub [/align]

Don't know what is wrong inside, ask the great spirit guide