Generates a set of file IDs which can be provided in create requests.
CREATE PROCEDURE ChilkatSample
AS
BEGIN
DECLARE @hr int
DECLARE @iTmp0 int
DECLARE @sTmp0 nvarchar(4000)
DECLARE @rest int
EXEC @hr = sp_OACreate 'Chilkat_9_5_0.Rest', @rest OUT
IF @hr <> 0
BEGIN
PRINT 'Failed to create ActiveX component'
RETURN
END
DECLARE @success int
-- Provide a previously obtained OAuth2 access token.
DECLARE @oauth2 int
EXEC @hr = sp_OACreate 'Chilkat_9_5_0.OAuth2', @oauth2 OUT
EXEC sp_OASetProperty @oauth2, 'AccessToken', 'OAUTH2_ACCESS_TOKEN'
EXEC sp_OAMethod @rest, 'SetAuthOAuth2', @success OUT, STR(@oauth2)
EXEC sp_OAMethod @rest, 'Connect', @success OUT, 'www.googleapis.com', 443, 1, 1
IF STR(@success) <> 1
BEGIN
EXEC sp_OAGetProperty @rest, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @rest
EXEC @hr = sp_OADestroy @oauth2
RETURN
END
EXEC sp_OAMethod @rest, 'AddQueryParam', @success OUT, 'count', '20'
EXEC sp_OAMethod @rest, 'AddQueryParam', @success OUT, 'space', 'drive'
DECLARE @sbJson int
EXEC @hr = sp_OACreate 'Chilkat_9_5_0.StringBuilder', @sbJson OUT
EXEC sp_OAMethod @rest, 'FullRequestNoBodySb', @success OUT, 'GET', '/drive/v3/files/generateIds', STR(@sbJson)
IF STR(@success) <> 1
BEGIN
EXEC sp_OAGetProperty @rest, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @rest
EXEC @hr = sp_OADestroy @oauth2
EXEC @hr = sp_OADestroy @sbJson
RETURN
END
EXEC sp_OAGetProperty @rest, 'ResponseStatusCode', @iTmp0 OUT
IF @iTmp0 <> 200
BEGIN
EXEC sp_OAGetProperty @rest, 'ResponseStatusCode', @iTmp0 OUT
PRINT 'Received error response code: ' + @iTmp0
PRINT 'Response body:'
EXEC sp_OAMethod @sbJson, 'GetAsString', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @rest
EXEC @hr = sp_OADestroy @oauth2
EXEC @hr = sp_OADestroy @sbJson
RETURN
END
DECLARE @json int
EXEC @hr = sp_OACreate 'Chilkat_9_5_0.JsonObject', @json OUT
EXEC sp_OAMethod @json, 'LoadSb', @success OUT, STR(@sbJson)
-- The following code parses the JSON response.
-- A sample JSON response is shown below the sample code.
DECLARE @kind nvarchar(4000)
DECLARE @space nvarchar(4000)
DECLARE @i int
DECLARE @count_i int
DECLARE @strVal nvarchar(4000)
EXEC sp_OAMethod @json, 'StringOf', @kind OUT, 'kind'
EXEC sp_OAMethod @json, 'StringOf', @space OUT, 'space'
SELECT @i = 0
EXEC sp_OAMethod @json, 'SizeOfArray', @count_i OUT, 'ids'
WHILE STR(@i) < STR(@count_i)
BEGIN
EXEC sp_OASetProperty @json, 'I', STR(@i)
EXEC sp_OAMethod @json, 'StringOf', @strVal OUT, 'ids[i]'
SELECT @i = STR(@i) + 1
END
PRINT 'Example Completed.'
EXEC @hr = sp_OADestroy @rest
EXEC @hr = sp_OADestroy @oauth2
EXEC @hr = sp_OADestroy @sbJson
EXEC @hr = sp_OADestroy @json
END
GO
{
"kind": "drive#generatedIds",
"space": "drive",
"ids": [
"1IT3VaUqXuF4l_4UKAFSmmC0em6kwlkle",
"1dX50zZmgzwDUonE_GI59oTF1D7RRYD3o",
"1eH17RULdRXu03inCaNuSeYkNwPS2nfUZ",
"1jXHKTHe6LazdWV0wPl8xAeHEoo_ZMBVt",
"1eBH9E3XDEczuUyfeOXT4Abq8S343qt5r",
"1R3okvS4vI1f1Psg0IJJ3dIhVQsv9SNyY",
"1rrh7NzGCgK0gYFlHC3IUdqQjcsVInN76",
"1glhBVDGFgS-61B_l0HaHBGiMRwyhuzp_",
"1gou1y4Mrq_ETHW7-GMV53e2jlhnze_2A",
"1KSUwFR7E9iDxpcLO8_hr6nnLUXGR0kAY",
"1pWt-cW7IBeEyGAkOxu8Q1KUpoHCkjGB2",
"1nnuZfxcmvq_nmHDKZLvKfohYFbs2X1q_",
"1rCGGTlP9aU9KNj_Qnt1a4ea3WdbV3NGk",
"1pLDQjyeBQvYOehHvW9mfzRzMp6yA-HOZ",
"1Ea-LO9eiwRlgJ-XvpFRxZUje1kFwaEBq",
"1nXtRHiCcIhXtY3YVcKmArlrljM2eLoGp",
"1g1VldY1fC3-w0JPycgUOU1mC524r5AHH",
"1lh1cKumE6jMc-FTfPk7y0V3jqzGydzyQ",
"1ZPdHqv3NI8tdVJ2k_XBr8cpkJYuq1E6c",
"1bxfXQmmrOUCnkZJogavDd6CF0eMSAzo9"
]
}