DataFlex
DataFlex
Twilio List Log Messages
See more Twilio Examples
Fetch the log containing information about SMS messages previously sent (or failed to be sent).Chilkat DataFlex Downloads
Use ChilkatAx-win32.pkg
Procedure Test
Boolean iSuccess
Handle hoHttp
Variant vSbResponseBody
Handle hoSbResponseBody
Handle hoJson
Integer iRespStatusCode
String sAccount_sid
String sApi_version
String sBody
String sDate_created
String sDate_sent
String sDate_updated
String sDirection
String sError_code
String sError_message
String sFrom
String sMessaging_service_sid
String sNum_media
String sNum_segments
String sPrice
String sPrice_unit
String sSid
String sStatus
String sSubresource_urisMedia
String sSubresource_urisFeedback
String sV_to
Integer iEnd
String sFirst_page_uri
String sNext_page_uri
Integer iPage
Integer iPage_size
String sPrevious_page_uri
Integer iStart
String sUri
Integer i
Integer iCount_i
String sTemp1
Move False To iSuccess
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Get Create (RefClass(cComChilkatHttp)) To hoHttp
If (Not(IsComObjectCreated(hoHttp))) Begin
Send CreateComObject of hoHttp
End
// 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
Set ComLogin Of hoHttp To "TWILIO_ACCOUNT_SID"
Set ComPassword Of hoHttp To "TWILIO_AUTH_TOKEN"
Get Create (RefClass(cComChilkatStringBuilder)) To hoSbResponseBody
If (Not(IsComObjectCreated(hoSbResponseBody))) Begin
Send CreateComObject of hoSbResponseBody
End
Get pvComObject of hoSbResponseBody to vSbResponseBody
Get ComQuickGetSb Of hoHttp "https://api.twilio.com/2010-04-01/Accounts/TWILIO_ACCOUNT_SID/Messages.json?PageSize=20" vSbResponseBody To iSuccess
If (iSuccess = False) Begin
Get ComLastErrorText Of hoHttp To sTemp1
Showln sTemp1
Procedure_Return
End
Get Create (RefClass(cComChilkatJsonObject)) To hoJson
If (Not(IsComObjectCreated(hoJson))) Begin
Send CreateComObject of hoJson
End
Get pvComObject of hoSbResponseBody to vSbResponseBody
Get ComLoadSb Of hoJson vSbResponseBody To iSuccess
Set ComEmitCompact Of hoJson To False
Showln "Response Body:"
Get ComEmit Of hoJson To sTemp1
Showln sTemp1
Get ComLastStatus Of hoHttp To iRespStatusCode
Showln "Response Status Code = " iRespStatusCode
If (iRespStatusCode >= 400) Begin
Showln "Response Header:"
Get ComLastHeader Of hoHttp To sTemp1
Showln sTemp1
Showln "Failed."
Procedure_Return
End
// 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
Get ComIntOf Of hoJson "end" To iEnd
Get ComStringOf Of hoJson "first_page_uri" To sFirst_page_uri
Get ComStringOf Of hoJson "next_page_uri" To sNext_page_uri
Get ComIntOf Of hoJson "page" To iPage
Get ComIntOf Of hoJson "page_size" To iPage_size
Get ComStringOf Of hoJson "previous_page_uri" To sPrevious_page_uri
Get ComIntOf Of hoJson "start" To iStart
Get ComStringOf Of hoJson "uri" To sUri
Move 0 To i
Get ComSizeOfArray Of hoJson "messages" To iCount_i
While (i < iCount_i)
Set ComI Of hoJson To i
Get ComStringOf Of hoJson "messages[i].account_sid" To sAccount_sid
Get ComStringOf Of hoJson "messages[i].api_version" To sApi_version
Get ComStringOf Of hoJson "messages[i].body" To sBody
Get ComStringOf Of hoJson "messages[i].date_created" To sDate_created
Get ComStringOf Of hoJson "messages[i].date_sent" To sDate_sent
Get ComStringOf Of hoJson "messages[i].date_updated" To sDate_updated
Get ComStringOf Of hoJson "messages[i].direction" To sDirection
Get ComStringOf Of hoJson "messages[i].error_code" To sError_code
Get ComStringOf Of hoJson "messages[i].error_message" To sError_message
Get ComStringOf Of hoJson "messages[i].from" To sFrom
Get ComStringOf Of hoJson "messages[i].messaging_service_sid" To sMessaging_service_sid
Get ComStringOf Of hoJson "messages[i].num_media" To sNum_media
Get ComStringOf Of hoJson "messages[i].num_segments" To sNum_segments
Get ComStringOf Of hoJson "messages[i].price" To sPrice
Get ComStringOf Of hoJson "messages[i].price_unit" To sPrice_unit
Get ComStringOf Of hoJson "messages[i].sid" To sSid
Get ComStringOf Of hoJson "messages[i].status" To sStatus
Get ComStringOf Of hoJson "messages[i].subresource_uris.media" To sSubresource_urisMedia
Get ComStringOf Of hoJson "messages[i].subresource_uris.feedback" To sSubresource_urisFeedback
Get ComStringOf Of hoJson "messages[i].to" To sV_to
Get ComStringOf Of hoJson "messages[i].uri" To sUri
Move (i + 1) To i
Loop
End_Procedure