(AutoIt) VoiceBase -- Retrieve JSON Transcript

Retrieves a JSON transcript for a media file.

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")

; 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)
$oHttp.SetRequestHeader "Authorization",$oSbAuth.GetAsString()

$oSbUrl = ObjCreate("Chilkat.StringBuilder")
$oSbUrl.Append("https://apis.voicebase.com/v2-beta/media/$MEDIA_ID/transcripts/latest")
Local $iReplaceCount = $oSbUrl.Replace("$MEDIA_ID","f9b9bb88-d52c-4960-bcef-d516a9f85594")

Local $strJson = $oHttp.QuickGetStr($oSbUrl.GetAsString())
If ($oHttp.LastMethodSuccess <> True) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

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

ConsoleWrite("Response status code = " & $oHttp.LastStatus & @CRLF)

If ($oHttp.LastStatus <> 200) Then
    ConsoleWrite($oJson.Emit() & @CRLF)
    ConsoleWrite("Failed" & @CRLF)
    Exit
EndIf

; See the sample JSON response below..

; Iterate over the words..
Local $iNumWords = $oJson.SizeOfArray("transcripts.latest.words")
Local $i = 0
While $i < $iNumWords
    $oJson.I = $i
    ConsoleWrite($oJson.StringOf("transcripts.latest.words[i].w") & @CRLF)
    $i = $i + 1
Wend
ConsoleWrite("Success." & @CRLF)

; A sample JSON response:

; { 
;   "_links": { 
;     "self": { 
;       "href": "/v2-beta/media/f9b9bb88-d52c-4960-bcef-d516a9f85594/transcripts/latest"
;     }
;   },
;   "transcripts": { 
;     "latest": { 
;       "revision": "b25e81dc-ae3e-4f9d-8008-1d56a283c17f",
;       "engine": "standard",
;       "confidence": 2.196210728898151,
;       "words": [
;         { 
;           "p": 0,
;           "s": 830,
;           "c": 0.14,
;           "e": 870,
;           "w": "You"
;         },
;         { 
;           "p": 1,
;           "s": 1860,
;           "c": 0.432,
;           "e": 1920,
;           "w": "know"
;         },
;         { 
;           "p": 2,
;           "s": 1930,
;           "c": 0.288,
;           "e": 2250,
;           "w": "that's"
;         },
;         { 
;           "p": 3,
;           "s": 2250,
;           "c": 0.923,
;           "e": 2300,
;           "w": "a"
;         },
; ...