ContactItem.Email1EntryID Property

  • Article
Outlook Developer Reference

Returns a String representing the entry ID of the first e-mail address for the contact. Read-only.

Syntax

expression.Email1EntryID

expression   A variable that represents a ContactItem object.

Remarks

This property corresponds to the MAPI named property dispidEmail1OriginalEntryID.

If you are getting this property in a Microsoft Visual Basic or Microsoft Visual Basic for Applications (VBA) solution, owing to some type issues, instead of directly referencing Email1EntryID, you should get the property through the PropertyAccessor object returned by the ContactItem.PropertyAccessor property, specifying the MAPI property dispidEmail1OriginalEntryID property and its MAPI id namespace. The following code sample in VBA shows the workaround.

Visual Basic for Applications 
  Public Sub GetEmail1EntryID()
    Dim objContactFolder As Outlook.Folder
    Dim objContactItem As Outlook.ContactItem
    Dim objRec As Outlook.Recipient
    Dim strEntryID As String
    Dim oPA As Outlook.PropertyAccessor
    Const PR_EMAIL1_ENTRYID As String = "http://schemas.microsoft.com/mapi/id/{00062004-0000-0000-C000-000000000046}/80850102"

Set objContactFolder = Application.Session.GetDefaultFolder(olFolderContacts)
Set objContactItem = objContactFolder.Items(1)
Set oPA = objContactItem.PropertyAccessor
strEntryID = oPA.BinaryToString(oPA.GetProperty(PR_EMAIL1_ENTRYID))
Debug.Print strEntryID
Set objRec = Application.Session.GetRecipientFromID(strEntryID)
If objRec Is Nothing Then
    Debug.Print "GetRecipientFromID failed"
Else
    Debug.Print objRec.Name
    Debug.Print objRec.EntryID
End If

'Cleanup
Set objContactItem = Nothing
Set objContactFolder = Nothing



End Sub

See Also