(AutoIt) WaTrend Send WhatsApp Text

See more WaTrend Examples

Send a WhatsApp text.

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
$oReq = ObjCreate("Chilkat.HttpRequest")
$oReq.AddParam "number","84933313xxx"
$oReq.AddParam "type","text"
$oReq.AddParam "message","This is a test message"
$oReq.AddParam "instance_id","609ACF283XXXX"
$oReq.AddParam "access_token","555555555555555555555555555555"

; Note: The WaTrend online documentation indicate a POST should be used.
; However, it seems you might actually need to send a GET request.
; It is unclear.  
; If a GET is neeed, you would just send to the URL w/ query params like this:
$oSbUrl = ObjCreate("Chilkat.StringBuilder")
$oSbUrl.Append("https://app.watrend.com/api/send.php?")
$oSbUrl.Append($oReq.GetUrlEncodedParams())
Local $sResponseBodyStr = $oHttp.QuickGetStr($oSbUrl.GetAsString())
; The responseBodyStr contains the JSON response from the server..

; If a POST is needed, then it is sent like this:
Local $oResp = $oHttp.PostUrlEncoded("https://app.watrend.com/api/send.php",$oReq)
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

ConsoleWrite($oResp.BodyStr & @CRLF)

; Both success and failed responses use 200 status code.

; A success response contains this JSON in the response body:
; {"status":"success", ... }

; A failed response will contain something like this:
; {"status":"error","message":"License Invalidated"}

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

Local $status = $oJResp.StringOf("status")
ConsoleWrite("status: " & $status & @CRLF)