方法: プログラムによって Outlook の連絡先を削除する
この例では、連絡先を削除します。この例では、"Armando Pinto" という名前の連絡先が [連絡先] フォルダーに存在することを前提にしています。
対象: このトピックの情報は、Outlook 2013 と Outlook 2010 のアプリケーション レベルのプロジェクトに適用されます。詳細については、「Office アプリケーションおよびプロジェクト タイプ別の使用可能な機能」を参照してください。
使用例
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();
}
}
参照
処理手順
方法: プログラムによって Outlook の連絡先にアクセスする