如何:从项的自定义字段中读取数据
更新:2007 年 11 月
适用对象 |
---|
本主题中的信息仅适用于指定的 Visual Studio Tools for Office 项目和 Microsoft Office 版本。 项目类型
Microsoft Office 版本
有关更多信息,请参见按应用程序和项目类型提供的功能。 |
此示例从某个联系人项的自定义字段读取数据。此示例检查名为 Picnic 的文件夹中的联系人是否在名为 Picnic 的自定义文本字段中具有某个值。代码显示具有值 Potato Salad 的所有联系人的名称。
示例
Private Sub ThisAddIn_Startup(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles Me.Startup
Dim result As New System.Text.StringBuilder()
Dim contactFolder As Outlook.MAPIFolder = Me.Application.GetNamespace _
("MAPI").GetDefaultFolder _
(Outlook.OlDefaultFolders.olFolderContacts). _
Folders("Picnic")
Dim picnicMembers As Outlook.Items = _
contactFolder.Items.Restrict("[Picnic]='Potato Salad'")
For Each contact As Outlook.ContactItem In picnicMembers
result.AppendLine(contact.FullName)
Next
If result.Length > 0 Then
MessageBox.Show(result.ToString(), "Potato Salad")
Else
MessageBox.Show( _
"No contacts are assigned potato salad for the picnic.", _
"Potato Salad")
End If
End Sub
private void ThisAddIn_Startup(object sender,
System.EventArgs e)
{
System.Text.StringBuilder result =
new System.Text.StringBuilder();
Outlook.MAPIFolder contactFolder = this.
Application.GetNamespace("MAPI").
GetDefaultFolder(Outlook.OlDefaultFolders.
olFolderContacts).Folders["Picnic"];
Outlook.Items picnicMembers = contactFolder.Items.
Restrict("[Picnic]='Potato Salad'");
foreach (Outlook.ContactItem contact in picnicMembers)
{
result.AppendLine(contact.FullName);
}
if (result.Length > 0)
{
MessageBox.Show(result.ToString(), "Potato Salad");
}
else
{
MessageBox.Show("No contacts are assigned potato salad"
+ " for the picnic.", "Potato Salad");
}
}
可靠编程
如果在文件夹集合中未找到自定义文件夹 Picnic,则引发 COMException 异常。您可以捕捉此异常,并在缺少文件夹的情况下创建该文件夹。