474424_zh-TW

liliconcom

如何將excel的VBA改為JSL才能下載資料？

大家好！

VBA可以從該網站下載資料。但我不知道如何將其更改為JSL以使其工作。

非常感謝！

Sub Post()
Dim User_agent, Url_Post
User_agent = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/87.0.4280.66 Safari/537.36"
Url_Post = "http://excalc.icfqs.com:7616/TQLEX?Entry=HQServ.hq_nlp"
Post_data = "[{""funcId"":4,""cond"":""code,1603969|"",""modname"":""TickAly""}]"
With CreateObject("WinHttp.WinHttpRequest.5.1")
    .Open "post", Url_Post, False
    .SetRequestHeader "User-Agent", User_agent
    .Send (Post_data)
    Debug.Print .Responsetext
End With
End Sub

自動化和腳本編寫視窗回复： 這樣的網址怎麼才能編輯腳本才能下載數據？

使用JMP的http請求，就像VB一樣。

 

The octet stream means you need blobToChar conversion.The octet stream means you need blobToChar conversion.The octet stream means you need blobToChar conversion.八位字節流意味著您需要 blobToChar 轉換。

回复： 這樣的網址怎麼才能編輯腳本才能下載數據？

VBA代碼，就是不知道怎麼改成JSL。

請專家指導。非常感謝！

Sub Post()
Dim User_agent, Url_Post
User_agent = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/87.0.4280.66 Safari/537.36"
Url_Post = "http://excalc.icfqs.com:7616/TQLEX?Entry=HQServ.hq_nlp"
Post_data = "[{""funcId"":4,""cond"":""code,1603969|"",""modname"":""TickAly""}]"
With CreateObject("WinHttp.WinHttpRequest.5.1")
    .Open "post", Url_Post, False
    .SetRequestHeader "User-Agent", User_agent
    .Send (Post_data)
    Debug.Print .Responsetext
End With
End Sub

回复： 這樣的網址怎麼才能編輯腳本才能下載數據？

回复： 這樣的網址怎麼才能編輯腳本才能下載數據？

POST:
http://excalc.icfqs.com:7616/TQLEX?Entry=HQServ.hq_nlp HTTP/1.1
Host: excalc.icfqs.com:7616
Proxy-Connection: keep-alive
Content-Length: 85
Origin: http://excalc.icfqs.com:7616
User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/78.0.3904.108 Safari/537.36
Content-Type: text/plain
Accept: */*
Referer: http://excalc.icfqs.com:7616/site/tdx-zbfx/page-detail.html?setcode=1&code=688262&name=%E5%9B%BD%E8%8A%AF%E7%A7%91%E6%8A%80&color=0
Accept-Encoding: gzip, deflate
Accept-Language: zh-CN,zh;q=0.9,en;q=0.8,zh-TW;q=0.7
Cookie: ASPSessionID=

[{"funcId":1,"offset":0,"count":200,"cond":"code,1688262|INT,3","modname":"TickAly"}]