SQL Server

Lookup Google Drive Folder ID Given a Folder Path

See more Google Drive Examples

Demonstrates how to find the Google Drive folder ID given a Folder Path.

This example demonstrates that we cannot simply query by folder name. (We can if every folder name is unique, but if not...) For example, imagine we have the following directory structure on Google Drive:

/AAWorkArea
/AAWorkArea/FolderA
/AAWorkArea/FolderB
/Folder2
/Folder2/FolderA

There are two directories named "FolderA". One is contained within AAWorkArea, and one is contained within "Folder2". To say it differently: One has the parent "AAWorkArea" and the other's parent is "Folder2".

To find the id of "/AAWorkArea/FolderA", we need to first find the id for "AAWorkArea", and then find the id for the folder with name="FolderA" and with AAWorkArea's id in FolderA's parents.

SQL Server

-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @iTmp0 int
    -- Important: Do not use nvarchar(max).  See the warning about using nvarchar(max).
    DECLARE @sTmp0 nvarchar(4000)
    DECLARE @success int
    SELECT @success = 0

    SELECT @success = 1

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

    DECLARE @gAuth int
    EXEC @hr = sp_OACreate 'Chilkat.AuthGoogle', @gAuth OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    EXEC sp_OASetProperty @gAuth, 'AccessToken', 'GOOGLE-DRIVE-ACCESS-TOKEN'

    DECLARE @rest int
    EXEC @hr = sp_OACreate 'Chilkat.Rest', @rest OUT

    -- Connect using TLS.
    DECLARE @bAutoReconnect int
    SELECT @bAutoReconnect = 1
    EXEC sp_OAMethod @rest, 'Connect', @success OUT, 'www.googleapis.com', 443, 1, @bAutoReconnect

    -- Provide the authentication credentials (i.e. the access token)
    EXEC sp_OAMethod @rest, 'SetAuthGoogle', @success OUT, @gAuth

    DECLARE @json int
    EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @json OUT

    EXEC sp_OASetProperty @json, 'EmitCompact', 0

    -- Get the AAWorkArea folder that is in the Google Drive root.
    EXEC sp_OAMethod @rest, 'AddQueryParam', @success OUT, 'q', '''root'' in parents and name=''AAWorkArea'''
    DECLARE @jsonResponse nvarchar(4000)
    EXEC sp_OAMethod @rest, 'FullRequestNoBody', @jsonResponse OUT, 'GET', '/drive/v3/files'
    EXEC sp_OAGetProperty @rest, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 <> 1
      BEGIN
        EXEC sp_OAGetProperty @rest, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @gAuth
        EXEC @hr = sp_OADestroy @rest
        EXEC @hr = sp_OADestroy @json
        RETURN
      END
    EXEC sp_OAMethod @json, 'Load', @success OUT, @jsonResponse
    EXEC sp_OAMethod @json, 'Emit', @sTmp0 OUT
    PRINT @sTmp0

    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'files[0].name'
    PRINT 'name: ' + @sTmp0

    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'files[0].id'
    PRINT 'id: ' + @sTmp0

    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'files[0].mimeType'
    PRINT 'mimeType: ' + @sTmp0

    PRINT '-'

    EXEC sp_OAMethod @rest, 'ClearAllQueryParams', @success OUT

    -- Now that we know the ID for the AAWorkarea directory, get the id for the FolderA having AAWorkArea as the parent.
    DECLARE @sbQuery int
    EXEC @hr = sp_OACreate 'Chilkat.StringBuilder', @sbQuery OUT

    EXEC sp_OAMethod @sbQuery, 'Append', @success OUT, 'name = ''FolderA'' and '''
    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'files[0].id'
    EXEC sp_OAMethod @sbQuery, 'Append', @success OUT, @sTmp0
    EXEC sp_OAMethod @sbQuery, 'Append', @success OUT, ''' in parents'
    EXEC sp_OAMethod @rest, 'AddQueryParamSb', @success OUT, 'q', @sbQuery

    EXEC sp_OAMethod @rest, 'FullRequestNoBody', @jsonResponse OUT, 'GET', '/drive/v3/files'
    EXEC sp_OAGetProperty @rest, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 <> 1
      BEGIN
        EXEC sp_OAGetProperty @rest, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @gAuth
        EXEC @hr = sp_OADestroy @rest
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @sbQuery
        RETURN
      END

    EXEC sp_OAMethod @json, 'Load', @success OUT, @jsonResponse
    EXEC sp_OAMethod @json, 'Emit', @sTmp0 OUT
    PRINT @sTmp0

    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'files[0].name'
    PRINT 'name: ' + @sTmp0

    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'files[0].id'
    PRINT 'id: ' + @sTmp0

    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'files[0].mimeType'
    PRINT 'mimeType: ' + @sTmp0

    PRINT '-'

    EXEC @hr = sp_OADestroy @gAuth
    EXEC @hr = sp_OADestroy @rest
    EXEC @hr = sp_OADestroy @json
    EXEC @hr = sp_OADestroy @sbQuery


END
GO