SQL Server
SQL Server
Outlook -- Get Number of Emails
See more Outlook Examples
Gets the number of emails in an Outlook folder. This uses the OData $count system query option. See OData System Query Option $count for general information.This example first gets the combined total number of messages across all folders.
Note: This example requires Chilkat v9.5.0.68 or greater.
This example applies to: Exchange Online | Office 365 | Hotmail.com | Live.com | MSN.com | Outlook.com | Passport.com
Chilkat SQL Server Downloads
-- 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
-- This example requires the Chilkat API to have been previously unlocked.
-- See Global Unlock Sample for sample code.
DECLARE @http int
EXEC @hr = sp_OACreate 'Chilkat.Http', @http OUT
IF @hr <> 0
BEGIN
PRINT 'Failed to create ActiveX component'
RETURN
END
-- Use your previously obtained access token here:
-- See the following examples for getting an access token:
-- Get Microsoft Graph OAuth2 Access Token (Azure AD v2.0 Endpoint).
-- Get Microsoft Graph OAuth2 Access Token (Azure AD Endpoint).
-- Refresh Access Token (Azure AD v2.0 Endpoint).
-- Refresh Access Token (Azure AD Endpoint).
EXEC sp_OASetProperty @http, 'AuthToken', 'MICROSOFT_GRAPH_ACCESS_TOKEN'
DECLARE @sbResponse int
EXEC @hr = sp_OACreate 'Chilkat.StringBuilder', @sbResponse OUT
-- This gets the combined total number of emails in all folders.
EXEC sp_OAMethod @http, 'QuickGetSb', @success OUT, 'https://graph.microsoft.com/v1.0/me/messages/$count', @sbResponse
EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
IF (@success <> 1) and (@iTmp0 = 0)
BEGIN
EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @sbResponse
RETURN
END
DECLARE @json int
EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @json OUT
EXEC sp_OASetProperty @json, 'EmitCompact', 0
-- If the status code was not 200, then it failed and the response is likely JSON:
EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
IF @iTmp0 <> 200
BEGIN
EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
PRINT 'Status code = ' + @iTmp0
EXEC sp_OAMethod @json, 'LoadSb', @success OUT, @sbResponse
EXEC sp_OAMethod @json, 'Emit', @sTmp0 OUT
PRINT @sTmp0
PRINT 'Failed.'
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @sbResponse
EXEC @hr = sp_OADestroy @json
RETURN
END
-- A success response payload contains just the integer value (it is not JSON)
EXEC sp_OAMethod @sbResponse, 'GetAsString', @sTmp0 OUT
PRINT 'Combined Total Number of Emails = ' + @sTmp0
PRINT '--'
-- ---------------------------------------------------------------------------
-- To get the number of emails in a particular folder, we need to use the folder id.
--
-- In this example, we'd like to get number of messages in the folder "/Inbox/abc",
-- but we must specify the corresponding folder_id. The best way to do this is to create
-- a local map of folderPaths-to-folderIds.
-- We'll use the map created by this example: Create Outlook Folder Map)
DECLARE @htFolderMap int
EXEC @hr = sp_OACreate 'Chilkat.Hashtable', @htFolderMap OUT
DECLARE @sbMap int
EXEC @hr = sp_OACreate 'Chilkat.StringBuilder', @sbMap OUT
EXEC sp_OAMethod @sbMap, 'LoadFile', @success OUT, 'qa_data/outlook/folderMap.xml', 'utf-8'
EXEC sp_OAMethod @htFolderMap, 'AddFromXmlSb', @success OUT, @sbMap
-- Get the ID for the "/Inbox/abc" folder:
DECLARE @folderId nvarchar(4000)
EXEC sp_OAMethod @htFolderMap, 'LookupStr', @folderId OUT, '/Inbox/abc'
EXEC sp_OAGetProperty @htFolderMap, 'LastMethodSuccess', @iTmp0 OUT
IF @iTmp0 <> 1
BEGIN
PRINT 'Folder ID not found'
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @sbResponse
EXEC @hr = sp_OADestroy @json
EXEC @hr = sp_OADestroy @htFolderMap
EXEC @hr = sp_OADestroy @sbMap
RETURN
END
EXEC sp_OAMethod @http, 'SetUrlVar', @success OUT, 'folder_id', @folderId
-- Send the request get the folder information.
-- In this case we are NOT using the $count system query option.
EXEC sp_OAMethod @http, 'QuickGetSb', @success OUT, 'https://graph.microsoft.com/v1.0/me/mailFolders/{$folder_id}', @sbResponse
EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
IF (@success <> 1) and (@iTmp0 = 0)
BEGIN
EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @sbResponse
EXEC @hr = sp_OADestroy @json
EXEC @hr = sp_OADestroy @htFolderMap
EXEC @hr = sp_OADestroy @sbMap
RETURN
END
EXEC sp_OAMethod @json, 'LoadSb', @success OUT, @sbResponse
EXEC sp_OAMethod @json, 'Emit', @sTmp0 OUT
PRINT @sTmp0
PRINT '--'
EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
IF @iTmp0 <> 200
BEGIN
EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
PRINT 'Status code = ' + @iTmp0
PRINT 'Failed.'
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @sbResponse
EXEC @hr = sp_OADestroy @json
EXEC @hr = sp_OADestroy @htFolderMap
EXEC @hr = sp_OADestroy @sbMap
RETURN
END
-- The successful JSON response looks like this;
-- {
-- "@odata.context": "https://graph.microsoft.com/v1.0/$metadata#users('me')/mailFolders/$entity",
-- "id": "AQMkADAwATM0MDAAMS1iNTcwLWI2NTEtMDACLTAwCgAuAAADsVyfxjDU406Ic4X7ill8xAEA5_vF7TKKdE6bGCRqXyl2PQAAAL8huv8AAAA=",
-- "displayName": "abc",
-- "parentFolderId": "AQMkADAwATM0MDAAMS1iNTcwLWI2NTEtMDACLTAwCgAuAAADsVyfxjDU406Ic4X7ill8xAEA5_vF7TKKdE6bGCRqXyl2PQAAAgEMAAAA",
-- "childFolderCount": 2,
-- "unreadItemCount": 0,
-- "totalItemCount": 3
-- }
--
-- Get the integer value from the JSON like this:
DECLARE @totalItemCount int
EXEC sp_OAMethod @json, 'IntOf', @totalItemCount OUT, 'totalItemCount'
PRINT 'totalItemCount = ' + @totalItemCount
DECLARE @childFolderCount int
EXEC sp_OAMethod @json, 'IntOf', @childFolderCount OUT, 'childFolderCount'
PRINT 'childFolderCount = ' + @childFolderCount
-- etc..
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @sbResponse
EXEC @hr = sp_OADestroy @json
EXEC @hr = sp_OADestroy @htFolderMap
EXEC @hr = sp_OADestroy @sbMap
END
GO