Dim jobDownload As HttpJob
jobDownload.Initialize("jobLoad", Me)
jobDownload.PostString("http://builders.test.com/api/Mobile", "aidiUser=" & userId & "&Tipe=1")
jobDownload.GetRequest.SetHeader("Authorization", "Bearer " & Token)
jobDownload.GetRequest.SetHeader("Accept", "application/json")
Wait For (jobDownload) JobDone(j As HttpJob)
If j.Success Then
................
Else
MsgboxAsync(jobDownload.ErrorMessage,"jobLoad") <---------- message
End If
jobDownload.Release()