Outlook Business Contact Manager Folders

G

Guy

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.
 
G

Guy

I figured it out.....

Should have been Dim objFolder As Outlook.MAPIFolder

Sometimes I just don't pay attention.....;)

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


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.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Outlook Userform Combobox Sort Code 0
move folders in outlook using vba 1
Post a message into a Public Folder 1
copying a custom view from a public folder and distributing programatically 1
Need to Override Outlook 2007's security 1
VBA script does not work 0
Operation Failed, object could be not be found - Can't find the fo 2
For Each loop not getting all Email Items 3

Top