VBA code, I just don't know how to change to JSL.
Experts are invited to guide.Thank you very much!
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