Gewusst wie: Programmgesteuertes Löschen von Outlook-Kontakten
In diesem Beispiel wird ein Kontakt gelöscht.Im Beispiel wird davon ausgegangen, dass im Ordner Kontakte ein Kontakt mit dem Namen "Armando Pinto" vorhanden ist.
Betrifft: Die Informationen in diesem Thema betreffen Projekte auf Anwendungsebene für Outlook 2013 und Outlook 2010. Weitere Informationen finden Sie unter Verfügbare Funktionen nach Office-Anwendung und Projekttyp.
Beispiel
Private Sub ThisAddIn_Startup(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles Me.Startup
DeleteContact("Pinto", "Armando")
End Sub
Private Sub DeleteContact(ByVal lastName As String, _
ByVal firstName As String)
Dim contact As Outlook.ContactItem = _
TryCast(Me.Application.GetNamespace("MAPI").GetDefaultFolder( _
Outlook.OlDefaultFolders.olFolderContacts).Items. _
Find( _
String.Format("[LastName]='{0}' AND [FirstName]='{1}'", _
lastName, firstName)), _
Outlook.ContactItem)
If (contact IsNot Nothing) Then
contact.Delete()
End If
End Sub
private void ThisAddIn_Startup(object sender, System.EventArgs e)
{
DeleteContact("Pinto", "Armando");
}
private void DeleteContact(string lastName, string firstName)
{
Outlook.ContactItem contact =
this.Application.GetNamespace("MAPI").
GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts).
Items.
Find(
string.Format("[LastName]='{0}' AND [FirstName]='{1}'",
lastName, firstName))
as Outlook.ContactItem;
if (contact != null)
{
contact.Delete();
}
}
Siehe auch
Aufgaben
Gewusst wie: Programmgesteuertes Suchen eines bestimmten Kontakts
Gewusst wie: Programmgesteuertes Zugreifen auf Outlook-Kontakte