Accessing a Mailbox

  • Thread starter Thread starter Guest
  • Start date Start date
G

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?
 
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
 
Back
Top