(AutoIt) Twilio List Log Messages

Fetch the log containing information about SMS messages previously sent (or failed to be sent).

For more information, see https://www.twilio.com/docs/sms/api/message-resource?code-sample=code-read-list-all-messages&code-language=curl&code-sdk-version=json

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

; Implements the following CURL command:

; curl -X GET 'https://api.twilio.com/2010-04-01/Accounts/TWILIO_ACCOUNT_SID/Messages.json?PageSize=20' \
; -u TWILIO_ACCOUNT_SID:TWILIO_AUTH_TOKEN

; Use the following online tool to generate HTTP code from a CURL command
; Convert a cURL Command to HTTP Source Code

$oHttp.Login = "TWILIO_ACCOUNT_SID"
$oHttp.Password = "TWILIO_AUTH_TOKEN"

$oSbResponseBody = ObjCreate("Chilkat.StringBuilder")
$bSuccess = $oHttp.QuickGetSb("https://api.twilio.com/2010-04-01/Accounts/TWILIO_ACCOUNT_SID/Messages.json?PageSize=20",$oSbResponseBody)
If ($bSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.LoadSb($oSbResponseBody)
$oJson.EmitCompact = False

ConsoleWrite("Response Body:" & @CRLF)
ConsoleWrite($oJson.Emit() & @CRLF)

Local $iRespStatusCode = $oHttp.LastStatus
ConsoleWrite("Response Status Code = " & $iRespStatusCode & @CRLF)
If ($iRespStatusCode >= 400) Then
    ConsoleWrite("Response Header:" & @CRLF)
    ConsoleWrite($oHttp.LastHeader & @CRLF)
    ConsoleWrite("Failed." & @CRLF)
    Exit
EndIf

; Sample JSON response:
; (Sample code for parsing the JSON response is shown below)

; {
;   "end": 1,
;   "first_page_uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=0",
;   "next_page_uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=1&PageToken=PAMMc26223853f8c46b4ab7dfaa6abba0a26",
;   "page": 0,
;   "page_size": 2,
;   "previous_page_uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=0",
;   "messages": [
;     {
;       "account_sid": "ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
;       "api_version": "2010-04-01",
;       "body": "testing",
;       "date_created": "Fri, 24 May 2019 17:44:46 +0000",
;       "date_sent": "Fri, 24 May 2019 17:44:50 +0000",
;       "date_updated": "Fri, 24 May 2019 17:44:50 +0000",
;       "direction": "outbound-api",
;       "error_code": null,
;       "error_message": null,
;       "from": "+12019235161",
;       "messaging_service_sid": null,
;       "num_media": "0",
;       "num_segments": "1",
;       "price": "-0.00750",
;       "price_unit": "USD",
;       "sid": "SMded05904ccb347238880ca9264e8fe1c",
;       "status": "sent",
;       "subresource_uris": {
;         "media": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/SMded05904ccb347238880ca9264e8fe1c/Media.json",
;         "feedback": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/SMded05904ccb347238880ca9264e8fe1c/Feedback.json"
;       },
;       "to": "+18182008801",
;       "uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/SMded05904ccb347238880ca9264e8fe1c.json"
;     },
;     {
;       "account_sid": "ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
;       "api_version": "2010-04-01",
;       "body": "look mom I have media!",
;       "date_created": "Fri, 24 May 2019 17:44:46 +0000",
;       "date_sent": "Fri, 24 May 2019 17:44:49 +0000",
;       "date_updated": "Fri, 24 May 2019 17:44:49 +0000",
;       "direction": "inbound",
;       "error_code": 30004,
;       "error_message": "Message blocked",
;       "from": "+12019235161",
;       "messaging_service_sid": null,
;       "num_media": "3",
;       "num_segments": "1",
;       "price": "-0.00750",
;       "price_unit": "USD",
;       "sid": "MMc26223853f8c46b4ab7dfaa6abba0a26",
;       "status": "received",
;       "subresource_uris": {
;         "media": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/MMc26223853f8c46b4ab7dfaa6abba0a26/Media.json",
;         "feedback": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/MMc26223853f8c46b4ab7dfaa6abba0a26/Feedback.json"
;       },
;       "to": "+18182008801",
;       "uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages/MMc26223853f8c46b4ab7dfaa6abba0a26.json"
;     }
;   ],
;   "start": 0,
;   "uri": "/2010-04-01/Accounts/ACXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/Messages.json?To=%2B123456789&From=%2B987654321&DateSent%3E=2008-01-02&PageSize=2&Page=0"
; }

; Sample code for parsing the JSON response...
; Use the following online tool to generate parsing code from sample JSON:
; Generate Parsing Code from JSON

Local $sAccount_sid
Local $sApi_version
Local $sBody
Local $sDate_created
Local $sDate_sent
Local $sDate_updated
Local $sDirection
Local $sError_code
Local $sError_message
Local $sFrom
Local $sMessaging_service_sid
Local $sNum_media
Local $sNum_segments
Local $sPrice
Local $sPrice_unit
Local $sid
Local $status
Local $subresource_urisMedia
Local $subresource_urisFeedback
Local $sV_to

Local $iEnd = $oJson.IntOf("end")
Local $sFirst_page_uri = $oJson.StringOf("first_page_uri")
Local $sNext_page_uri = $oJson.StringOf("next_page_uri")
Local $iPage = $oJson.IntOf("page")
Local $iPage_size = $oJson.IntOf("page_size")
Local $sPrevious_page_uri = $oJson.StringOf("previous_page_uri")
Local $iStart = $oJson.IntOf("start")
Local $sUri = $oJson.StringOf("uri")
Local $i = 0
Local $iCount_i = $oJson.SizeOfArray("messages")
While $i < $iCount_i
    $oJson.I = $i
    $sAccount_sid = $oJson.StringOf("messages[i].account_sid")
    $sApi_version = $oJson.StringOf("messages[i].api_version")
    $sBody = $oJson.StringOf("messages[i].body")
    $sDate_created = $oJson.StringOf("messages[i].date_created")
    $sDate_sent = $oJson.StringOf("messages[i].date_sent")
    $sDate_updated = $oJson.StringOf("messages[i].date_updated")
    $sDirection = $oJson.StringOf("messages[i].direction")
    $sError_code = $oJson.StringOf("messages[i].error_code")
    $sError_message = $oJson.StringOf("messages[i].error_message")
    $sFrom = $oJson.StringOf("messages[i].from")
    $sMessaging_service_sid = $oJson.StringOf("messages[i].messaging_service_sid")
    $sNum_media = $oJson.StringOf("messages[i].num_media")
    $sNum_segments = $oJson.StringOf("messages[i].num_segments")
    $sPrice = $oJson.StringOf("messages[i].price")
    $sPrice_unit = $oJson.StringOf("messages[i].price_unit")
    $sid = $oJson.StringOf("messages[i].sid")
    $status = $oJson.StringOf("messages[i].status")
    $subresource_urisMedia = $oJson.StringOf("messages[i].subresource_uris.media")
    $subresource_urisFeedback = $oJson.StringOf("messages[i].subresource_uris.feedback")
    $sV_to = $oJson.StringOf("messages[i].to")
    $sUri = $oJson.StringOf("messages[i].uri")
    $i = $i + 1
Wend