Address Property (AddressEntry Object)
Address Property (AddressEntry Object)
The Address property specifies the messaging address of an address entry or message recipient. Read/write.
Syntax
objAddressEntry.Address
Data Type
String
Remarks
The AddressEntry object's Address property contains a unique string that identifies a message recipient and provides routing information for messaging systems. The format of the address string is specific to each messaging system.
The AddressEntry object's Address and Type properties can be combined to form the full address, the complete messaging address that appears in the Recipient object's Address property using the following syntax:
AddressType:AddressValue
The Address property corresponds to the MAPI property PR_EMAIL_ADDRESS. It can be rendered into HTML hypertext using the CDO Rendering ObjectRenderer object. To specify this, set the object renderer's DataSource property to this AddressEntry object and the property parameter of the RenderProperty method to CdoPR_EMAIL_ADDRESS.
Example
' Set up a series of object variables
' Set the Folder and Messages variables from Session_Inbox
Set objFolder = objSession.Inbox
Set objMessages = objFolder.Messages
' Set the Message object variable from Messages_GetFirst()
Set objOneMsg = objMessages.GetFirst
' Set the Recipients collection variable from Message_Recipients()
Set objRecipColl = objOneMsg.Recipients
' Set the Recipient object variable from Recipients_Item()
If 0 = objRecipColl.Count Then
MsgBox "No recipients in the list"
Exit Function
End If
iRecipCollIndex = 1
Set objOneRecip = objRecipColl.Item(iRecipCollIndex)
' could also be objRecipColl(iRecipCollIndex) since .Item is default
' set the AddressEntry object variable from Recipient_AddressEntry()
Set objAddrEntry = objOneRecip.AddressEntry
' from Util_CompareFullAddressParts()
' display the values
strMsg = "Recipient full address = " & objOneRecip.Address
strMsg = strMsg & "; AddressEntry type = " & objAddrEntry.Type
strMsg = strMsg & "; AddressEntry address = " & objAddrEntry.Address
MsgBox strMsg