Lianja

Empty Trash

See more Google Drive Examples

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

llSuccess = .F.

llSuccess = .T.

// 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.

loGAuth = createobject("CkAuthGoogle")
loGAuth.AccessToken = "GOOGLE-DRIVE-ACCESS-TOKEN"

loRest = createobject("CkRest")

// Connect using TLS.
llBAutoReconnect = .T.
llSuccess = loRest.Connect("www.googleapis.com",443,.T.,llBAutoReconnect)

// Provide the authentication credentials (i.e. the access token)
loRest.SetAuthGoogle(loGAuth)

lcJsonResponse = loRest.FullRequestNoBody("DELETE","/drive/v3/files/trash")
if (loRest.LastMethodSuccess <> .T.) then
    ? loRest.LastErrorText
    release loGAuth
    release loRest
    return
endif

// 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 (loRest.ResponseStatusCode <> 204) then
    ? "response status code = " + str(loRest.ResponseStatusCode)
    ? "response status text = " + loRest.ResponseStatusText
    ? "response header: " + loRest.ResponseHeader
    ? "response JSON: " + lcJsonResponse
    release loGAuth
    release loRest
    return
endif

? "Trash Emptied!"


release loGAuth
release loRest