Dim web As new windows.forms.webbrowser
web.Navigate("https://s.1688.com/selloffer/-CAFDC2EBD3A1BBA8-1046457.html?spm=b26110380.sw0.0.0.pfGSFx&cps=1&n=y&uniqfield=pic_tag_id")
Do Until web.ReadyState = 4
Application.DoEvents
Loop
Dim getReader = new System.IO.StreamReader(web.DocumentStream, Encoding.Default)
Dim str = getReader.ReadToEnd()
output.show(str)