WinHTTP ComObjCreate WinHTTP WinHttpRequest WinHTTP Open POST https vt

1
2
3
4
5
6
WinHTTP := ComObjCreate("WinHTTP.WinHttpRequest.5.1")
WinHTTP.Open("POST", "https://vto.pe/api", 0)
WinHTTP.SetRequestHeader("Content-Type", "application/json")
WinHTTP.Send("{""user"": 3291963,""key"": ""cDwIp5jBwIfaEcfs"",""method"": ""balance"" }")
RegExMatch(StrSplit(WinHTTP.ResponseText, """")[5], "([0-9.]+)", out)
MsgBox % out1