(Xojo Plugin) Activix CRM Upload a Recording

Upload a recording for an existing communication.

Note: This example requires Chilkat v11.0.0 or greater.

For more information, see https://docs.crm.activix.ca/api/resources/communication

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

Dim success As Boolean
success = False

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

Dim req As New Chilkat.HttpRequest

req.HttpVerb = "POST"
req.Path = "/api/v2/communications/COMMUNICATION_ID/recording"
req.ContentType = "multipart/form-data"

req.AddHeader "Accept","application/json"

Dim pathToFileOnDisk As String
pathToFileOnDisk = "qa_data/CantinaBand3.wav"
success = req.AddFileForUpload("recording",pathToFileOnDisk)
If (success = False) Then
    System.DebugLog(req.LastErrorText)
    Return
End If

Dim http As New Chilkat.Http
http.AuthToken = "ACCESS_TOKEN"

Dim resp As New Chilkat.HttpResponse
success = http.HttpSReq("crm.activix.ca",443,True,req,resp)
If (success = False) Then
    System.DebugLog(http.LastErrorText)
    Return
End If

System.DebugLog("Response Status Code: " + Str(resp.StatusCode))

Dim jsonResponse As New Chilkat.JsonObject
success = jsonResponse.Load(resp.BodyStr)
jsonResponse.EmitCompact = False
System.DebugLog(jsonResponse.Emit())

If (resp.StatusCode >= 300) Then
    System.DebugLog("Failed.")
    Return
End If

// Sample output...

// {
//   "message": "Recording uploaded successfully."
// }
//