Dim j As HttpJob
j.Initialize("job name", Me)
j.PostString("https://api.bit.io/v2beta/query",$"{"query_string":"SELECT * FROM \"Companies\";","database_name":"<DBName>"}"$)
j.GetRequest.SetHeader("Authorization","Bearer <APIKEY>")
j.GetRequest.SetHeader("Accept","application/json")
j.GetRequest.SetHeader("Content-Type","application/json")
j.GetRequest.SetHeader("Host","api.bit.io")
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Log(j.GetString)
End If
j.Release