HTTP POST

[redbull2k]

how would this look in au. i cant seem to grasp it.
Function Function6
Trigger F12     

Code:

Copy      Help

typelib WinHttp {662901FC-6951-4854-9EB2-D9A2570F2B2E} 5.1
WinHttp.WinHttpRequest xhr._create
xhr.Open("POST" F"http://192.168.1.1/test/")
xhr.setRequestHeader("accept", "application/json")
xhr.setRequestHeader("content-type", "application/json-rpc");
str enc.encrypt(4 "admin:password")
xhr.SetRequestHeader("Authorization", F"Basic {enc}")
str data= "{''jsonrpc'':''1.1'',''method'':''change'',''id'': 0,''params'':[{}]}"
xhr.send(data)