Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3/4 Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(SQL Server) Find a Label ID by NameLookup the ID of a GMail label by the label name.
CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @iTmp0 int DECLARE @sTmp0 nvarchar(4000) -- This example requires the Chilkat API to have been previously unlocked. -- See Global Unlock Sample for sample code. DECLARE @success int DECLARE @http int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.Http', @http OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END EXEC sp_OASetProperty @http, 'AuthToken', 'GMAIL-ACCESS-TOKEN' DECLARE @userId nvarchar(4000) SELECT @userId = 'me' EXEC sp_OAMethod @http, 'SetUrlVar', @success OUT, 'userId', @userId DECLARE @url nvarchar(4000) SELECT @url = 'https://www.googleapis.com/gmail/v1/users/{$userId}/labels' -- Get the list of GMail labels as JSON. DECLARE @sb int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.StringBuilder', @sb OUT EXEC sp_OAMethod @http, 'QuickGetSb', @success OUT, @url, @sb IF @success <> 1 BEGIN EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @sb RETURN END DECLARE @json int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.JsonObject', @json OUT EXEC sp_OAMethod @json, 'LoadSb', @success OUT, @sb EXEC sp_OASetProperty @json, 'EmitCompact', 0 EXEC sp_OAMethod @json, 'Emit', @sTmp0 OUT PRINT @sTmp0 EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT IF @iTmp0 <> 200 BEGIN PRINT 'Failed.' EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @sb EXEC @hr = sp_OADestroy @json RETURN END -- The JSON returned looks like this: -- { -- "labels": [ -- { -- "id": "Label_5", -- "name": "QA", -- "messageListVisibility": "show", -- "labelListVisibility": "labelShow", -- "type": "user" -- }, -- { -- "id": "Label_21", -- "name": "[Gmail]/testFolder", -- "type": "user" -- }, -- { -- "id": "CATEGORY_PERSONAL", -- "name": "CATEGORY_PERSONAL", -- "type": "system" -- }, -- ... -- The name of the label is generally known because it's what we visually see. -- The id is what we need to get. Assuming the name is unique, -- find the JSON record having name=<desired name> -- For example... DECLARE @jRecord int EXEC sp_OAMethod @json, 'FindRecord', @jRecord OUT, 'labels', 'name', 'QA', 0 EXEC sp_OAGetProperty @json, 'LastMethodSuccess', @iTmp0 OUT IF @iTmp0 = 1 BEGIN EXEC sp_OAMethod @jRecord, 'StringOf', @sTmp0 OUT, 'id' PRINT 'The id of QA is: ' + @sTmp0 EXEC @hr = sp_OADestroy @jRecord END EXEC sp_OAMethod @json, 'FindRecord', @jRecord OUT, 'labels', 'name', '[Gmail]/testFolder', 0 EXEC sp_OAGetProperty @json, 'LastMethodSuccess', @iTmp0 OUT IF @iTmp0 = 1 BEGIN EXEC sp_OAMethod @jRecord, 'StringOf', @sTmp0 OUT, 'id' PRINT 'The id of [Gmail]/testFolder is: ' + @sTmp0 EXEC @hr = sp_OADestroy @jRecord END EXEC sp_OAMethod @json, 'FindRecord', @jRecord OUT, 'labels', 'name', 'questions', 0 EXEC sp_OAGetProperty @json, 'LastMethodSuccess', @iTmp0 OUT IF @iTmp0 = 1 BEGIN EXEC sp_OAMethod @jRecord, 'StringOf', @sTmp0 OUT, 'id' PRINT 'The id of questions is: ' + @sTmp0 EXEC @hr = sp_OADestroy @jRecord END -- Output: -- The id of QA is: Label_5 -- The id of [Gmail]/testFolder is: Label_21 -- The id of questions is: Label_43 EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @sb EXEC @hr = sp_OADestroy @json END GO |
© 2000-2019 Chilkat Software, Inc. All Rights Reserved.