Get Inboxes from Outlook

Question

I configured two Exchange accounts in Outlook 2010, however I cant find out how to get to Inbox of the second account. Session.GetDefaultFolder() always return the first one.

Even enumerating Session.Accounts, finding the right account and calling Session.Account(found one).Store.GetDefaultFolder() returns wrong Inbox (from the default exchange account, not the secondary).

Would love to know if my code worked for you. – JimmyPena Sep 13 '11 at 15:39 — JimmyPena, Sep 13 '11 at 15:39

score 4 · Answer 1 · answered Sep 06 '11 at 17:24

Does this show you all the available Inboxes?

Sub LoopThroughInboxes

Dim ol As Outlook.Application
Dim ns As Outlook.NameSpace
Dim i As Long

Set ol = Outlook.Application
Set ns = ol.GetNamespace("MAPI")

For i = 1 To ns.Folders.Count
 Debug.Print ns.Folders(i).Name
Next i

If so then ns.Folders(i).Folders("Inbox") will get you the Inbox for each mailbox.

score 3 · Answer 2 · answered Nov 22 '13 at 12:02

3

To Go to Mapix library

Mapix library link as given below

Mapix library for C++/MFC

Note: This Library valid for Inbox emails in MS Outlook

answered Nov 22 '13 at 12:02

Vijay Kumbhani

734
1
6
26

Dmitry Streblechenko · Answer 3 · 2022-04-02T17:03:01.193

3

Use Store.GetDefaultFolder instead of Namespace.GetDefaultFolder. Note that Store.GetDefaultFolder was added in Outlook 2010. In the earlier versions of Outlook use Extended MAPI (C++ or Delphi) or Redemption (I am its author) - RDOStore.GetDefaultFolder.

edited Apr 02 '22 at 17:03

answered Oct 12 '11 at 20:03

Dmitry Streblechenko

62,942
4
53
78

score 1 · Answer 4 · answered Sep 15 '14 at 17:59

I guess this is an old one, but somebody might need it one day. Here is code to iterate all "Sent Mail" folders in Outlook. (I think this will only work for Outlook 2010 and newer).

MSOutlook._NameSpace ns = Globals.ThisAddIn.Application.GetNamespace("MAPI");
var accounts = ns.Accounts;
foreach (MSOutlook.Account account in accounts)
{
    try
    {
        // You might want to test if DeliveryStore is null, in case this account is not an Exchange account
        MSOutlook.MAPIFolder sentFolder = account.DeliveryStore.GetDefaultFolder(MSOutlook.OlDefaultFolders.olFolderSentMail);
        if(sentFolder != null)
        {
            SentItems = sentFolder.Items;
            SentItems.ItemAdd += LogMethods.Items_Sent_ItemAdd;
        }
    }
    catch (Exception e)
    {
        BaseClass.log.Log(LoggLevel.Warning, e.Message);
    }
}

score 1 · Answer 5 · answered Jan 06 '12 at 10:01

Maybe you have long given up on this question, but here goes...

I've had this same problem before and I solved it by adding the Outlook Account Management API. Unfortunately for you, this a c++ oriented API. (My addin was already developed in c++)

Furthermore, the OOM (Outlook Object Model) which VBA and the .NET addins use has poor (if any) support for multiple accounts. By adding to exchange accounts, you have essentially added multiple accounts to your profile.

So, You might have to go down a level, using MAPI with c++ and then hook in the Outlook Account Management API. It's a lot of work, but that's exactely what I did and it worked like a charm.

Also, here is an example: http://www.codeproject.com/KB/IP/IOlkAccountManager.aspx

Get Inboxes from Outlook

5 Answers5

Linked