C
Chris Kettenbach
I am using Access to automate outlook. I want to save the items in a
subfolder of my contacts folder.
I have this so far
sub MakeContact()
dim ol as outlook.application
dim ns as outlook.namespace
dim fldr as outlook.mapifolder
dim myC as outlook.contactitem
set ol = new outlook.application
set ns = ol.getnamespace("MAPI")
set fldr = ol.getdefaultfolder(olFolderContacts)
set fldr2 = fldr.folders("My Folder")
'blah blah blah
end sub
my dilema is that it save the created contactitem to the main contacts
folder. The idea is to save the item to fldr2. What am I doing wrong? Can
anyone help?
Regards,
~ck
subfolder of my contacts folder.
I have this so far
sub MakeContact()
dim ol as outlook.application
dim ns as outlook.namespace
dim fldr as outlook.mapifolder
dim myC as outlook.contactitem
set ol = new outlook.application
set ns = ol.getnamespace("MAPI")
set fldr = ol.getdefaultfolder(olFolderContacts)
set fldr2 = fldr.folders("My Folder")
'blah blah blah
end sub
my dilema is that it save the created contactitem to the main contacts
folder. The idea is to save the item to fldr2. What am I doing wrong? Can
anyone help?
Regards,
~ck