(AutoIt) WaTrend Create Instance

See more WaTrend Examples

Create a new WaTrend Instance ID.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.

$oHttp = ObjCreate("Chilkat.Http")
Local $bSuccess

; Use your actual access token instead of 555555555555555555555555555555
Local $oResp = $oHttp.QuickRequest("GET","https://app.watrend.com/api/createinstance.php?access_token=555555555555555555555555555555")
If ($oHttp.LastMethodSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

$oSbResponseBody = ObjCreate("Chilkat.StringBuilder")
$oResp.GetBodySb($oSbResponseBody)

Local $iRespStatusCode = $oResp.StatusCode
ConsoleWrite("Response Status Code = " & $iRespStatusCode & @CRLF)
If ($iRespStatusCode >= 400) Then
    ConsoleWrite("Response Header:" & @CRLF)
    ConsoleWrite($oResp.Header & @CRLF)
    ConsoleWrite("Failed." & @CRLF)

    Exit
EndIf

; Both success and failed responses use 200 status code.

; A success response contains this JSON in the response body:
; {"status":"success","message":"Instance ID generated successfully","instance_id":"638EE5A76D3AA"}

; A failed response will contain something like this:
; {"status":"error","message":"Access token does not exist"}

ConsoleWrite($oResp.BodyStr & @CRLF)

$oJResp = ObjCreate("Chilkat.JsonObject")
$oJResp.LoadSb($oSbResponseBody)

Local $status = $oJResp.StringOf("status")
Local $sInstanceId = ""
If ($oJResp.HasMember("instance_id") = True) Then
    $sInstanceId = $oJResp.StringOf("instance_id")
EndIf

ConsoleWrite("status: " & $status & @CRLF)
ConsoleWrite("instance_id: " & $sInstanceId & @CRLF)