(AutoIt) VoiceBase -- Upload a media file for transcription and analysis

This example demonstrates how to upload a media file for transcription and analysis. It duplicates the following curl command:

curl https://apis.voicebase.com/v2-beta/media \
  --form media=@msg_123_abc.wav \
  --header "Authorization: Bearer ${TOKEN}"

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

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

; Insert your Bearer token here:
Local $sAccessToken = "VOICEBASE_TOKEN"

$oHttp = ObjCreate("Chilkat.Http")

$oReq = ObjCreate("Chilkat.HttpRequest")
$oReq.HttpVerb = "POST"
$oReq.Path = "/v2-beta/media"
$oReq.ContentType = "multipart/form-data"

; Add the access (bearer) token to the request, which is a header
; having the following format:
; Authorization: Bearer <userAccessToken>
$oSbAuth = ObjCreate("Chilkat.StringBuilder")
$oSbAuth.Append("Bearer ")
$oSbAuth.Append($sAccessToken)
$oReq.AddHeader "Authorization",$oSbAuth.GetAsString()

Local $bSuccess = $oReq.AddFileForUpload2("media","qa_data/wav/msg_123_abc.wav","audio/x-wav")
If ($bSuccess <> True) Then
    ConsoleWrite($oReq.LastErrorText & @CRLF)
    Exit
EndIf

Local $oResp = $oHttp.SynchronousRequest("apis.voicebase.com",443,True,$oReq)
If ($oHttp.LastMethodSuccess <> True) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

; Examine the response status code and body.
ConsoleWrite("Response status code = " & $oResp.StatusCode & @CRLF)

; The response should be JSON, even if an error.
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.Load($oResp.BodyStr)
$oJson.EmitCompact = False

ConsoleWrite($oJson.Emit() & @CRLF)

; A successful response will have a status code = 200
If ($oResp.StatusCode <> 200) Then
    ConsoleWrite("Failed." & @CRLF)
Else
    ConsoleWrite("mediaId: " & $oJson.StringOf("mediaId") & @CRLF)
    ConsoleWrite("href: " & $oJson.StringOf("_links.self.href") & @CRLF)
    ConsoleWrite("status: " & $oJson.StringOf("status") & @CRLF)
    ConsoleWrite("Success." & @CRLF)
EndIf

; Here is an example of a successful response:

; 	{ 
; 	  "_links": { 
; 	    "self": { 
; 	      "href": "/v2-beta/media/856a1e85-c847-4c3c-b7a4-6cf15cd51db4"
; 	    }
; 	  },
; 	  "mediaId": "856a1e85-c847-4c3c-b7a4-6cf15cd51db4",
; 	  "status": "accepted",
; 	  "metadata": {}
;