Application![]() ![]() ![]() |
代表联系人文件夹中的通讯组列表。通讯组列表可以包含多个收件人,用于向列表中的每个人发送邮件。
使用 CreateItem 方法创建代表新通讯组列表的 DistListItem 对象。以下 Microsoft Visual Basic for Applications 示例创建并显示新通讯组列表。
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olDistributionListItem)
myItem.Display
使用 Items(index) 从联系人文件夹(即默认项目类型为 olContactItem 的文件夹)返回单个 DistListItem 对象,其中 index 为项目在联系人文件夹中的索引号或用于匹配文件夹中项目默认属性的值。以下 Visual Basic for Applications 示例将当前文件夹设置为联系人文件夹,并显示文件夹中名为“Project Team”的现有通讯组列表。
Set myOlApp = CreateObject("Outlook.Application")
Set myNamespace = myOlApp.GetNamespace("MAPI")
Set myFolder = myNamespace.GetDefaultFolder(olFolderContacts)
myFolder.Display
Set myItem = myFolder.Items("Project Team")
myItem.Display