Procedura: accedere ai contatti di Outlook
In questo esempio vengono ricercati tutti i contatti il cui cognome contenga una stringa specificata.
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
AccessContacts("Na")
End Sub
Private Sub AccessContacts(ByVal findLastName As String)
Dim folderContacts As Outlook.MAPIFolder = Me.Application.ActiveExplorer() _
.Session.GetDefaultFolder(Outlook.OlDefaultFolders _
.olFolderContacts)
Dim searchFolder As Outlook.Items = folderContacts.Items
Dim counter As Integer = 0
For Each foundContact As Outlook.ContactItem In searchFolder
If foundContact.LastName.Contains(findLastName) Then
foundContact.Display(False)
counter = counter + 1
End If
Next
MsgBox("You have " & counter & _
" contacts with last names that contain " _
& findLastName & ".")
End Sub
private void ThisAddIn_Startup(object sender, System.EventArgs e)
{
AccessContacts("Na");
}
private void AccessContacts(string findLastName)
{
Outlook.MAPIFolder folderContacts = this.Application.ActiveExplorer().Session.
GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts);
Outlook.Items searchFolder = folderContacts.Items;
int counter = 0;
foreach (Outlook.ContactItem foundContact in searchFolder)
{
if (foundContact.LastName.Contains(findLastName))
{
foundContact.Display(false);
counter = counter + 1;
}
}
MessageBox.Show("You have " + counter +
" contacts with last names that contain "
+ findLastName + ".");
}
Compilazione del codice
L'esempio presenta i seguenti requisiti:
- Contatti il cui cognome contenga la stringa "Na", ad esempio Tzipi Butnaru, nella cartella Contatti.
Vedere anche
Attività
Procedura: aggiungere una voce ai contatti di Outlook
Procedura: eseguire la ricerca di un contatto specifico
Procedura: eseguire la ricerca di un indirizzo di posta elettronica nei contatti
Procedura: eliminare contatti di Outlook