如何用脚本下载这个网站的查询结果?
这个是其他语言的代码、要如何修改才能工作?谢谢大家!Sub West()
Dim result, antistop, Values As Variant, i, j, x, y, cnt
Dim Json As Object
cnt = Range("b1") & ""
antistop = "{""question"":""ROE>20"",""perpage"":" & cnt & ",""page"":9,""secondary_intent"":""stock"",""log_info"":""{\""input_type\"":\""click\""}"",""source"":""Ths_iwencai_Xuangu"",""version"":""2.0"",""query_area"":"""",""block_list"":"""",""a
...