G
Guest
I am trying to execute the following code in cached exchange mode in a
workstation installation of Outlook 2003:
Public oMapi As NameSpace
Public ofFolder As MAPIFolder
Sub getPartnerPrivate()
Dim oFolders As Folders
Dim oRecip As Recipient
Set oMapi = Application.GetNamespace("MAPI")
Set oRecip = oMapi.CreateRecipient("partnerprivate")
oRecip.Resolve
Set ofFolder = oMapi.GetSharedDefaultFolder(oRecip, olFolderInbox)
ofFolder.Display
End Sub
Can't. I believe I need to write using Extended MAPI but have no idea.
Would anybody know?
workstation installation of Outlook 2003:
Public oMapi As NameSpace
Public ofFolder As MAPIFolder
Sub getPartnerPrivate()
Dim oFolders As Folders
Dim oRecip As Recipient
Set oMapi = Application.GetNamespace("MAPI")
Set oRecip = oMapi.CreateRecipient("partnerprivate")
oRecip.Resolve
Set ofFolder = oMapi.GetSharedDefaultFolder(oRecip, olFolderInbox)
ofFolder.Display
End Sub
Can't. I believe I need to write using Extended MAPI but have no idea.
Would anybody know?