View Single Post
  #1  
Old March 4th 10, 09:52 PM posted to microsoft.public.outlook.program_vba
scottb2
external usenet poster
 
Posts: 9
Default Outlook Distribution List contents


I have a folder hierarchy of

Public folders
...All Public Folders
......Dept
.........Distribution List

Distribution List has a DefaultItemType of "olContactItem" and a
DefaultMessageClass of "IPM.Contact".

I have scanned the folder chain and have a Folder object for
"Distribution List" if that helps.

I wish to take a list of Contacts and create a distribution list in
"Distribution List", of course :-) I understand that a DL contains only
a name and email address but my requirement is that the user be able to
see all of the contact information when clicking on a DL member.

Any help to accomplish this is appreciated. My attempt is at the end
of this message.

Thanks,
Scott


Code:
--------------------
Outlook.DistListItem oDL;
Outlook.MailItem tempItem;
Outlook.Recipients oRecipients;
bool resolveRet;

oDL = oApp.CreateItem(Outlook.OlItemType.olDistributionL istItem)
as Outlook.DistListItem;

tempItem = oApp.CreateItem(Outlook.OlItemType.olMailItem) as Outlook.MailItem;
oRecipients = tempItem.Recipients;
oDL.DLName = "Associate Email Distribution List";
foreach (Outlook.ContactItem oContact in contactList)
{
oRecipients.Add(oContact.Email1Address);
}
resolveRet = oRecipients.ResolveAll();
oDL.AddMembers(oRecipients);
oDL.Save();
--------------------


--
scottb2
http://forums.slipstick.com

Ads