Procedura: leggere dati da un campo personalizzato di un elemento
In questo esempio vengono letti i dati da un campo personalizzato di un elemento contatto. Lo scopo è quello di ricercare nei contatti contenuti in una cartella denominata Picnic un valore in un campo di testo personalizzato denominato Picnic. Il codice visualizza il nome di tutti i contatti con valore Potato Salad.
Si applica a: le informazioni fornite in questo argomento sono valide per i progetti a livello di applicazione per Outlook 2007 e Outlook 2010. Per ulteriori informazioni, vedere Funzionalità disponibili in base ai tipi di progetto e applicazioni di Office.
Esempio
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
MsgBox(result.ToString(), "Potato Salad")
Else
MsgBox( _
"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");
}
}
Programmazione efficiente
Verrà generata un'eccezione COMException se nell'insieme di cartelle non viene trovata la cartella di contatti personalizzata Picnic. È possibile intercettare questa eccezione e creare la cartella, qualora non esista.
Vedere anche
Attività
Procedura: spostare elementi in Outlook
Procedura: creare cartelle personalizzate
Procedura: recuperare una cartella per nome