Outlook) (ContactItem.EntryID 屬性

會傳回代表物件唯一「項目 ID」的 String。 唯讀。

語法

expression。 EntryID

表達 代表 ContactItem 物件的 變數。

註解

此屬性相當於 MAPI 屬性 PidTagEntryId。

在存放檔中建立項目時，MAPI 存放檔提供者會指派唯一的 ID 字串。 因此，EntryID 屬性要儲存或傳送之後，才能針對 Outlook 項目設定。 項目移到另一個存放檔時 (例如：從您的 [收件匣] 移到 Microsoft Exchange Server 公用資料夾，或從一個「個人資料夾」(.pst) 檔案移到另一個 .pst 檔案)，會變更「項目 ID」。 除非不移除項目，否則不應依靠唯一的 EntryID 屬性做為解決方案。 EntryID 屬性會傳回 MAPI 的長期「項目 ID」。 如需長期和短期 EntryIDs 的詳細資訊，請搜尋 Microsoft Learn 中的 PidTagEntryId。

範例

這個 Visual Basic for Applications (VBA) 範例會使用 EntryID 屬性，將一個連絡人的輸入識別碼與搜尋作業所傳回之連絡人的輸入識別碼進行比較，以判斷物件是否代表相同的連絡人。 在執行此範例之前，請先將名稱取代成 [連絡人] 資料夾中有效的連絡人名稱。

Sub UseEntryID() 
 Dim myNamespace As Outlook.NameSpace 
 Dim myContacts As Outlook.Folder 
 Dim myItem1 As Outlook.ContactItem 
 Dim myItem2 As Outlook.ContactItem 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myContacts = myNameSpace.GetDefaultFolder(olFolderContacts) 
 Set myItem1 = myContacts.Items.Find("[FirstName] = ""Dan""") 
 Set myitem2 = myContacts.Items.Find("[FileAs] = ""Wil"" and [FirstName] = ""Dan""") 
 If Not TypeName(myitem2) = "Nothing" Then 
 If myItem1.EntryID = myitem2.EntryID Then 
 MsgBox "These two contact items refer to the same contact." 
 End If 
 Else 
 MsgBox "The contact items were not found." 
 End If 
End Sub

另請參閱

ContactItem 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。