Lianja

Delete File

See more Google Drive Examples

Permanently deletes a file owned by the user without moving it to the trash. If the target is a folder, all descendants owned by the user are also deleted.

See Google Drive Files delete for more information.

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)

// To delete a file, we must use the fileId.
// This must've been obtained by listing or searching for the file
// to get the metadata.
// Assume we already did that an have the fileId
lcFileId = "0B53Q6OSTWYoldUprZVU1ZVQ5Z0k"

loSbPath = createobject("CkStringBuilder")
loSbPath.Append("/drive/v3/files/")
loSbPath.Append(lcFileId)

lcJsonResponse = loRest.FullRequestNoBody("DELETE",loSbPath.GetAsString())
if (loRest.LastMethodSuccess <> .T.) then
    ? loRest.LastErrorText
    release loGAuth
    release loRest
    release loSbPath
    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
    release loSbPath
    return
endif

? "File deleted."


release loGAuth
release loRest
release loSbPath