ref: vbMAPI_ContactItem

On this page you'll find:

    Class Description

    This object is a wrapper for the MAPI IMessage object. To create a new object of type vbMAPI_MailItem, use the vbMAPI_FolderItems Add method. To open an existing object, use the vbMAPI_FolderItems Item method.


    Property Get Properties() As vbMAPI_Properties

    Exposes a collection of the MAPI properties set on this message.  The default member of the vbMAPI_Properties class is Item, therefore in VB you can call vbMAPI_MailItem.Properties(PropTag) directly.

    Property Get NamedProperties(ByVal PropertySetGUID As String, _
                  ByVal ID As Variant, _
                  ByVal DataType As EnumMAPIPropDataTypes) As vbMAPI_Property

    Provides access to MAPI named properties for this MailItem.

    PropertySetGUID: A string representation of the property set GUID (e.g. )
    ID: The name (string) or property identifier (integer) representing the property to query from the property set.
    DataType: The MAPI data type of the property.

    Property Get ConversationIndex() As Variant
    
    Property Let ConversationIndex(ByVal RetVal As Variant)

    Returns/sets the value of the MAPI property PR_CONVERSATION_INDEX from this message.

    Property Get ConversationTopic() As String
    
    Property Let ConversationTopic(ByVal RetVal As String)

    Returns/sets the value of the MAPI property PR_CONVERSATION_TOPIC from this message.

    Property Get CreationTime() As Date

    Returns the value of the MAPI property PR_CREATION_TIME from this message.

    Property Get EntryID() As String

    Returns the value of the MAPI property PR_ENTRYID from this message.

    Property Get Importance() As EnumImportance
    
    Property Let Importance(ByVal RetVal As EnumImportance)

    Returns/sets the value of the MAPI property PR_IMPORTANCE from this message.

    Property Get InternetCodepage() As Long
    
    Property Let InternetCodepage(ByVal RetVal As Long)

    Returns/sets the value of the MAPI property PR_INTERNET_CPID from this message.

    Property Get LastModificationTime() As Date

    Returns the value of the MAPI property PR_LAST_MODIFICATION_TIME from this message.

    Property Get MessageClass() As String
    
    Property Let MessageClass(ByVal RetVal As String)

    Returns/sets the value of the MAPI property PR_MESSAGE_CLASS from this message.

    Property Get Sensitivity() As EnumSensitivity
    
    Property Let Sensitivity(ByVal RetVal As EnumSensitivity)

    Returns/sets the value of the MAPI property PR_SENSITIVITY from this message.

    Property Get Size() As Long

    Returns the value of the MAPI property PR_MESSAGE_SIZE from this message.

    Property Get Subject() As String
    
    Property Let Subject(ByVal RetVal As String)

    Returns/sets the value of the MAPI property PR_SUBJECT from this message.

    Property Get ParentEntryID() As String

    Returns the value of the MAPI property PR_PARENT_ENTRYID from this message.

    Property Get BillingInformation() As String
    
    Property Let BillingInformation(ByVal RetVal As String)

    Returns/sets the BillingInformation Outlook property.

    Property Get OutlookInternalVersion() As Long
    
    Property Let OutlookInternalVersion(ByVal RetVal As Long)

    Returns/sets the OutlookInternalVersion Outlook property.

    Property Get HidePaperClip() As Boolean
    
    Property Let HidePaperClip(ByVal RetVal As Boolean)

    Returns/sets the HidePaperClip Outlook property.

    Property Get Mileage() As String
    
    Property Let Mileage(ByVal RetVal As String)

    Returns/sets the Mileage Outlook property.

    Property Get NoAging() As Boolean
    
    Property Let NoAging(ByVal RetVal As Boolean)

    Returns/sets the NoAging Outlook property.

    Property Get OutlookVersion() As String
    
    Property Let OutlookVersion(ByVal RetVal As String)

    Returns/sets the OutlookVersion Outlook property.

    Property Get Body() As vbMAPI_EncodedBody

    Returns/sets the plain text version of the body for this message.  Can be derived from HTML/RTF if not supported by the message store, or if explicitly requested using the Source parameter.

    The default member of the vbMAPI_EncodedBody class is the Value property, therefore you can ignore the vbMAPI_EncodedBody class and treat this property as a string.

    Property Get HTMLBody() As vbMAPI_EncodedBody

    Returns/sets the HTML version of the body for this message.  Can be derived from RTF/PlainText if not supported by the message store, or if explicitly requested using the Source parameter.

    The default member of the vbMAPI_EncodedBody class is the Value property, therefore you can ignore the vbMAPI_EncodedBody class and treat this property as a string.

    Property Get RTFBody() As vbMAPI_EncodedBody

    Returns/sets the RTF version of the body for this message.  Can be derived from HTML/PlainText if not supported by the message store, or if explicitly requested using the Source parameter.

    The default member of the vbMAPI_EncodedBody class is the Value property, therefore you can ignore the vbMAPI_EncodedBody class and treat this property as a string.

    Property Get Parent() As vbMAPI_Folder

    Returns the parent folder object associated with this object.

    Sub Save()

    Saves any modifications made to the current message.

    Property Get Session() As vbMAPI_Session

    Returns the session object associated with this object.

    Property Get UnRead() As Boolean
    
    Property Let UnRead(ByVal Val As Boolean)

    Returns/sets the read/unread status of the message.

    Property Get DownloadState() As EnumDownloadState

    Retrieves the download state of the message (fully downloaded or header only).

    Property Get MAPIOBJECT() As Variant

    Returns the IMessage object associated with this item.

    Property Get Attachments() As vbMAPI_Attachments

    Provides a collection of attachment objects associated with this message.

    Property Get BodyFormat() As EnumEncodedBodyFormat

    Returns the type of body format that is stored in this message. (BodyFormat_PlainText / BodyFormat_HTML / BodyFormat_RTF).

    Property Get Account() As String
    
    Property Let Account(ByVal RetVal As String)

    Returns the value of the MAPI property PR_ACCOUNT from this message.

    Property Get Anniversary() As String
    
    Property Let Anniversary(ByVal RetVal As String)

    Returns the value of the MAPI property PR_WEDDING_ANNIVERSARY from this message.

    Property Get AssistantName() As String
    
    Property Let AssistantName(ByVal RetVal As String)

    Returns the value of the MAPI property PR_ASSISTANT from this message.

    Property Get AssistantTelephoneNumber() As String
    
    Property Let AssistantTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_ASSISTANT_TELEPHONE_NUMBER from this message.

    Property Get Birthday() As String
    
    Property Let Birthday(ByVal RetVal As String)

    Returns the value of the MAPI property PR_BIRTHDAY from this message.

    Property Get Business2TelephoneNumber() As String
    
    Property Let Business2TelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_BUSINESS2_TELEPHONE_NUMBER from this message.

    Property Get BusinessFaxNumber() As String
    
    Property Let BusinessFaxNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_BUSINESS_FAX_NUMBER from this message.

    Property Get BusinessHomePage() As String
    
    Property Let BusinessHomePage(ByVal Value As String)

    No information available at this time.

    Property Get BusinessTelephoneNumber() As String
    
    Property Let BusinessTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_OFFICE_TELEPHONE_NUMBER from this message.

    Property Get CallbackTelephoneNumber() As String
    
    Property Let CallbackTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_CALLBACK_TELEPHONE_NUMBER from this message.

    Property Get CarTelephoneNumber() As String
    
    Property Let CarTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_CAR_TELEPHONE_NUMBER from this message.

    Property Get Children() As String
    
    Property Let Children(ByVal RetVal As String)

    Returns the value of the MAPI property PR_CHILDRENS_NAMES from this message.

    Property Get CompanyMainTelephoneNumber() As String
    
    Property Let CompanyMainTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_COMPANY_MAIN_PHONE_NUMBER from this message.

    Property Get CompanyName() As String
    
    Property Let CompanyName(ByVal RetVal As String)

    Returns the value of the MAPI property PR_COMPANY_NAME from this message.

    Property Get ComputerNetworkName() As String
    
    Property Let ComputerNetworkName(ByVal RetVal As String)

    Returns the value of the MAPI property PR_COMPUTER_NETWORK_NAME from this message.

    Property Get CustomerID() As String
    
    Property Let CustomerID(ByVal RetVal As String)

    Returns the value of the MAPI property PR_CUSTOMER_ID from this message.

    Property Get DepartmentName() As String
    
    Property Let DepartmentName(ByVal RetVal As String)

    Returns the value of the MAPI property PR_DEPARTMENT_NAME from this message.

    Property Get FirstName() As String
    
    Property Let FirstName(ByVal Value As String)

    No information available at this time.

    Property Get LastName() As String
    
    Property Let LastName(ByVal Value As String)

    No information available at this time.

    Property Get MiddleName() As String
    
    Property Let MiddleName(ByVal Value As String)

    No information available at this time.

    Property Get FTPSite() As String
    
    Property Let FTPSite(ByVal RetVal As String)

    Returns the value of the MAPI property PR_FTP_SITE from this message.

    Property Get FullName() As String

    Returns the value of the MAPI property PR_DISPLAY_NAME from this message.

    Property Get Gender() As EnumGender
    
    Property Let Gender(ByVal RetVal As EnumGender)

    Returns the value of the MAPI property PR_GENDER from this message.

    Property Get GovernmentIDNumber() As String
    
    Property Let GovernmentIDNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_GOVERNMENT_ID_NUMBER from this message.

    Property Get Hobby() As String
    
    Property Let Hobby(ByVal RetVal As String)

    Returns the value of the MAPI property PR_HOBBIES from this message.

    Property Get Home2TelephoneNumber() As String
    
    Property Let Home2TelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_HOME2_TELEPHONE_NUMBER from this message.

    Property Get HomeFaxNumber() As String
    
    Property Let HomeFaxNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_HOME_FAX_NUMBER from this message.

    Property Get HomeTelephoneNumber() As String
    
    Property Let HomeTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_HOME_TELEPHONE_NUMBER from this message.

    Property Get ISDNNumber() As String
    
    Property Let ISDNNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_ISDN_NUMBER from this message.

    Property Get Initials() As String
    
    Property Let Initials(ByVal RetVal As String)

    Returns the value of the MAPI property PR_INITIALS from this message.

    Property Get JobTitle() As String
    
    Property Let JobTitle(ByVal RetVal As String)

    Returns the value of the MAPI property PR_TITLE from this message.

    Property Get Language() As String
    
    Property Let Language(ByVal RetVal As String)

    Returns the value of the MAPI property PR_LANGUAGE from this message.

    Property Get ManagerName() As String
    
    Property Let ManagerName(ByVal RetVal As String)

    Returns the value of the MAPI property PR_MANAGER_NAME from this message.

    Property Get MobileTelephoneNumber() As String
    
    Property Let MobileTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_CELLULAR_TELEPHONE_NUMBER from this message.

    Property Get NickName() As String
    
    Property Let NickName(ByVal RetVal As String)

    Returns the value of the MAPI property PR_NICKNAME from this message.

    Property Get OfficeLocation() As String
    
    Property Let OfficeLocation(ByVal RetVal As String)

    Returns the value of the MAPI property PR_OFFICE_LOCATION from this message.

    Property Get OrganizationalIDNumber() As String
    
    Property Let OrganizationalIDNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_ORGANIZATIONAL_ID_NUMBER from this message.

    Property Get OtherFaxNumber() As String
    
    Property Let OtherFaxNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_PRIMARY_FAX_NUMBER from this message.

    Property Get OtherTelephoneNumber() As String
    
    Property Let OtherTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_OTHER_TELEPHONE_NUMBER from this message.

    Property Get PagerNumber() As String
    
    Property Let PagerNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_PAGER_TELEPHONE_NUMBER from this message.

    Property Get PersonalHomePage() As String
    
    Property Let PersonalHomePage(ByVal RetVal As String)

    Returns the value of the MAPI property PR_PERSONAL_HOME_PAGE from this message.

    Property Get PrimaryTelephoneNumber() As String
    
    Property Let PrimaryTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_PRIMARY_TELEPHONE_NUMBER from this message.

    Property Get Profession() As String
    
    Property Let Profession(ByVal RetVal As String)

    Returns the value of the MAPI property PR_PROFESSION from this message.

    Property Get RadioTelephoneNumber() As String
    
    Property Let RadioTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_RADIO_TELEPHONE_NUMBER from this message.

    Property Get ReferredBy() As String
    
    Property Let ReferredBy(ByVal RetVal As String)

    Returns the value of the MAPI property PR_PREFERRED_BY_NAME from this message.

    Property Get Spouse() As String
    
    Property Let Spouse(ByVal RetVal As String)

    Returns the value of the MAPI property PR_SPOUSE_NAME from this message.

    Property Get Suffix() As String
    
    Property Let Suffix(ByVal RetVal As String)

    Returns the value of the MAPI property PR_GENERATION from this message.

    Property Get TelexNumber() As String
    
    Property Let TelexNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_TELEX_NUMBER from this message.

    Property Get Title() As String
    
    Property Let Title(ByVal RetVal As String)

    Returns the value of the MAPI property PR_DISPLAY_NAME_PREFIX from this message.

    Property Get TTYTDDTelephoneNumber() As String
    
    Property Let TTYTDDTelephoneNumber(ByVal RetVal As String)

    Returns the value of the MAPI property PR_TTYTDD_PHONE_NUMBER from this message.

    Property Get WebPage() As String
    
    Property Let WebPage(ByVal Value As String)

    No information available at this time.

    Property Get BusinessAddress() As String

    Returns/sets the BusinessAddress Outlook property.

    Property Get BusinessAddressCity() As String
    
    Property Let BusinessAddressCity(ByVal Value As String)

    No information available at this time.

    Property Get BusinessAddressCountry() As String
    
    Property Let BusinessAddressCountry(ByVal Value As String)

    No information available at this time.

    Property Get BusinessAddressPostalCode() As String
    
    Property Let BusinessAddressPostalCode(ByVal Value As String)

    No information available at this time.

    Property Get BusinessAddressPostOfficeBox() As String
    
    Property Let BusinessAddressPostOfficeBox(ByVal Value As String)

    No information available at this time.

    Property Get BusinessAddressState() As String
    
    Property Let BusinessAddressState(ByVal Value As String)

    No information available at this time.

    Property Get BusinessAddressStreet() As String
    
    Property Let BusinessAddressStreet(ByVal Value As String)

    No information available at this time.

    Property Get Email1AddressType() As String
    
    Property Let Email1AddressType(ByVal Value As String)

    Returns/sets the Email1AddressType Outlook property.

    Property Get Email1DisplayName() As String
    
    Property Let Email1DisplayName(ByVal Value As String)

    Returns/sets the Email1DisplayName Outlook property.

    Property Get Email2AddressType() As String
    
    Property Let Email2AddressType(ByVal Value As String)

    Returns/sets the Email2AddressType Outlook property.

    Property Get Email2DisplayName() As String
    
    Property Let Email2DisplayName(ByVal Value As String)

    Returns/sets the Email2DisplayName Outlook property.

    Property Get Email3AddressType() As String
    
    Property Let Email3AddressType(ByVal Value As String)

    Returns/sets the Email3AddressType Outlook property.

    Property Get Email3DisplayName() As String
    
    Property Let Email3DisplayName(ByVal Value As String)

    Returns/sets the Email3DisplayName Outlook property.

    Property Get FileAs() As String
    
    Property Let FileAs(ByVal Value As String)

    Returns/sets the FileAs Outlook property.

    Property Get HasPicture() As Boolean

    Returns/sets the HasPicture Outlook property.

    Property Get HomeAddress() As String

    Returns/sets the HomeAddress Outlook property.

    Property Get HomeAddressCity() As String
    
    Property Let HomeAddressCity(ByVal Value As String)

    No information available at this time.

    Property Get HomeAddressCountry() As String
    
    Property Let HomeAddressCountry(ByVal Value As String)

    No information available at this time.

    Property Get HomeAddressPostalCode() As String
    
    Property Let HomeAddressPostalCode(ByVal Value As String)

    No information available at this time.

    Property Get HomeAddressPostOfficeBox() As String
    
    Property Let HomeAddressPostOfficeBox(ByVal Value As String)

    No information available at this time.

    Property Get HomeAddressState() As String
    
    Property Let HomeAddressState(ByVal Value As String)

    No information available at this time.

    Property Get HomeAddressStreet() As String
    
    Property Let HomeAddressStreet(ByVal Value As String)

    No information available at this time.

    Property Get IMAddress() As String
    
    Property Let IMAddress(ByVal Value As String)

    Returns/sets the IMAddress Outlook property.

    Property Get InternetFreeBusyAddress() As String
    
    Property Let InternetFreeBusyAddress(ByVal Value As String)

    Returns/sets the InternetFreeBusyAddress Outlook property.

    Property Get Journal() As String
    
    Property Let Journal(ByVal Value As String)

    Returns/sets the Journal Outlook property.

    Property Get OtherAddress() As String

    Returns/sets the OtherAddress Outlook property.

    Property Get OtherAddressCity() As String
    
    Property Let OtherAddressCity(ByVal Value As String)

    No information available at this time.

    Property Get OtherAddressCountry() As String
    
    Property Let OtherAddressCountry(ByVal Value As String)

    No information available at this time.

    Property Get OtherAddressPostalCode() As String
    
    Property Let OtherAddressPostalCode(ByVal Value As String)

    No information available at this time.

    Property Get OtherAddressPostOfficeBox() As String
    
    Property Let OtherAddressPostOfficeBox(ByVal Value As String)

    No information available at this time.

    Property Get OtherAddressState() As String
    
    Property Let OtherAddressState(ByVal Value As String)

    No information available at this time.

    Property Get OtherAddressStreet() As String
    
    Property Let OtherAddressStreet(ByVal Value As String)

    No information available at this time.

    Property Get User1() As String
    
    Property Let User1(ByVal Value As String)

    Returns/sets the User1 Outlook property.

    Property Get User2() As String
    
    Property Let User2(ByVal Value As String)

    Returns/sets the User2 Outlook property.

    Property Get User3() As String
    
    Property Let User3(ByVal Value As String)

    Returns/sets the User3 Outlook property.

    Property Get User4() As String
    
    Property Let User4(ByVal Value As String)

    Returns/sets the User4 Outlook property.

    Property Get YomiCompanyName() As String
    
    Property Let YomiCompanyName(ByVal Value As String)

    Returns/sets the YomiCompanyName Outlook property.

    Property Get YomiFirstName() As String
    
    Property Let YomiFirstName(ByVal Value As String)

    Returns/sets the YomiFirstName Outlook property.

    Property Get YomiLastName() As String
    
    Property Let YomiLastName(ByVal Value As String)

    Returns/sets the YomiLastName Outlook property.

    Sub AddPicture(ByVal FilePath As String)

    No information available at this time.

    Sub RemovePicture()

    No information available at this time.

    Property Get CompanyAndFullName() As String

    No information available at this time.

    Property Get CompanyLastFirstNoSpace() As String

    No information available at this time.

    Property Get CompanyLastFirstSpaceOnly() As String

    No information available at this time.

    Property Get FullNameAndCompany() As String

    No information available at this time.

    Property Get LastFirstAndSuffix() As String

    No information available at this time.

    Property Get LastFirstNoSpace() As String

    No information available at this time.

    Property Get LastFirstNoSpaceAndSuffix() As String

    No information available at this time.

    Property Get LastFirstNoSpaceCompany() As String

    No information available at this time.

    Property Get LastFirstSpaceOnly() As String

    No information available at this time.

    Property Get LastFirstSpaceOnlyCompany() As String

    No information available at this time.

    Property Get LastNameAndFirstName() As String

    No information available at this time.

    Property Get SelectedMailingAddress() As EnumMailingAddress
    
    Property Let SelectedMailingAddress(ByVal Value As EnumMailingAddress)

    No information available at this time.

    Property Get MailingAddress() As String

    Returns/sets the PR_POSTAL_ADDRESS MAPI property.

    Property Get MailingAddressCity() As String
    
    Property Let MailingAddressCity(ByVal Value As String)

    No information available at this time.

    Property Get MailingAddressCountry() As String
    
    Property Let MailingAddressCountry(ByVal Value As String)

    No information available at this time.

    Property Get MailingAddressPostalCode() As String
    
    Property Let MailingAddressPostalCode(ByVal Value As String)

    No information available at this time.

    Property Get MailingAddressPostOfficeBox() As String
    
    Property Let MailingAddressPostOfficeBox(ByVal Value As String)

    No information available at this time.

    Property Get MailingAddressState() As String
    
    Property Let MailingAddressState(ByVal Value As String)

    No information available at this time.

    Property Get MailingAddressStreet() As String
    
    Property Let MailingAddressStreet(ByVal Value As String)

    No information available at this time.


    Enumeration description: EnumGender


    Gender_Unspecified = &H0
    Gender_Female = &H1
    Gender_Male = &H2


    Enumeration description: EnumMailingAddress


    MailingAddress_None = &H0
    MailingAddress_Home = &H1
    MailingAddress_Business = &H2
    MailingAddress_Other = &H3