Accessing a Mailbox

[Guest]

There is an "Other Calendar" option named Master Schedule. It is not in the
public folder tree, it is an individual user mailbox in the system. I need to
access the items and process against the schedules.

Dim emlSecond As MailItem
Dim nsMyNameSpace As NameSpace
Dim fdrInbox As MAPIFolder
Set nsMyNameSpace = Application.GetNamespace("MAPI")
Set fdrInbox = nsMyNameSpace.GetSharedDefaultFolder("Master Schedule",
olFolderInbox)
Set emlSecond = fdrInbox.Items.Item(5)
MsgBox "Second e-mail : " & vbCrLf & vbCrLf & emlSecond.Subject & vbCrLf &
emlSecond.Body

Gives a type mismatch at "Master Schedule". How do I access the mailbox items?

 

[Dmitry Streblechenko]

GetSharedDefaultFolder method takes the Recipient object (such as the one
returned by Namespace.CreateRecipient) as the first parameter.
Do you have the Outlook VBA help file installed?

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

 

[Guest]

Thank you for the CreateRecipient. This is where my error was.