View Single Post
  #3  
Old December 3rd 07, 09:36 PM posted to microsoft.public.outlook.program_vba
dch3
external usenet poster
 
Posts: 105
Default Determine the user mailbox for a specific folder

So I could adapt the function below to get the name then? - Stoping when I
get to 'MAPI' as the parent.

Public Function getFullFolderPath()
'Build the full path to the folder using the .parent property of the
selected folder by moving upward until will get to the topmost level.

Set nms = Outlook.Application.GetNamespace("MAPI")
Set targetFolder = nms.PickFolder

strPath = targetFolder

While targetFolder.Parent "Outlook"
strPath = targetFolder.Parent & "\" & strPath
Set targetFolder = targetFolder.Parent
Wend

Set targetFolder = Nothing
Set nms = Nothing

getFullFolderPath = strPath

End Function

"Ken Slovak - [MVP - Outlook]" wrote:

Just keep getting Parent until you've traversed up the hierarchy to Personal
Folders or Mailbox or whatever at the top of the stack.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm


"dch3" wrote in message
...
When the .pickfolder method of a namespace object is used to select a
folder,
is there a way to determine the mailbox or store in which the folder
exists?
For example, if the user has access to multiple mailboxes and selects
'Inbox', I would like to be able to determine whose Inbox was actually
selected.

I'm thinking that the .parent property of the folder won't be an option
since the user could select a subfolder.



Ads