View Single Post
  #1  
Old June 14th 06, 02:38 AM posted to microsoft.public.outlook.program_vba
Guy
external usenet poster
 
Posts: 12
Default Outlook Business Contact Manager Folders

I'm trying to "walk the folders" to get to the Opportunities folder in BCM. I get a type mismatch which leaves me to believe that they can't be retrieved using MAPI?

Dim objOutlook As Outlook.Application
Dim objNS As Outlook.Namespace
Dim objFolder As MAPI.Folder

Set objOutlook = CreateObject("Outlook.Application")
Set objNS = objOutlook.GetNamespace("MAPI")
Set objFolder = objNS.Folders.Item("Business Contact Manager"). _
Folders.Item("Opportunities")

Will this not work? If I look at the Locals window they show as MAPI folders so I'm confused.


--
Guy
Forefront Business Solutions
www.forefrontbusinesssolutions.com
www.forefrontbusiness.com


Ads