B4X

Empty Trash

See more Google Drive Examples

Permanently deletes all of the user's trashed files. B4X

Dim success As Boolean = False

success = True

'  It requires the Chilkat API to have been previously unlocked.
'  See Global Unlock Sample for sample code.

'  This example uses a previously obtained access token having permission for the 
'  Google Drive scope.

Dim gAuth As ChilkatAuthGoogle
gAuth.Initialize("gAuth")
gAuth.AccessToken = "GOOGLE-DRIVE-ACCESS-TOKEN"

Dim rest As ChilkatRest
rest.Initialize("rest")

'  Connect using TLS.
Dim bAutoReconnect As Boolean = True
success = rest.Connect("www.googleapis.com", 443, True, bAutoReconnect)

'  Provide the authentication credentials (i.e. the access token)
rest.SetAuthGoogle(gAuth)

Dim jsonResponse As String = rest.FullRequestNoBody("DELETE", "/drive/v3/files/trash")
If rest.LastMethodSuccess <> True Then
    Log(rest.LastErrorText)
    Return
End If


'  A successful response will have a status code equal to 204 and the response body is empty.
'  (If not successful, then there should be a JSON response body with information..)
If rest.ResponseStatusCode <> 204 Then
    Log("response status code = " & rest.ResponseStatusCode)
    Log("response status text = " & rest.ResponseStatusText)
    Log("response header: " & rest.ResponseHeader)
    Log("response JSON: " & jsonResponse)
    Return
End If


Log("Trash Emptied!")