K
ksskumar
Hi,
I am able to get the contactItem detils (FullName, CompanyName,
HomeTelephoneNumber, etc.,) using Outlook object model. Because of
the security patch problem, I thought of using Redemption.
In the Redemption SafeContactItem object contain fields like,
Email1AddressType, Email1DisplayName, Email1EntryID, etc. BUT, I am
not able to get the outlook contactItem fields (FullName, CompanyName,
HomeTelephoneNumber, etc.,).
I am using Outlook 2003. Programming language is Visual Basic 6.0. I
am using Redeption version 3.4.
My code sample (using outlook object model):
============================================
Dim oContacts As Object
Dim oContact As Outlook.ContactItem
Set oContacts = olNs.GetDefaultFolder(olFolderContacts)
Set oContact = oContacts.Items.Item(intPos)
txtFullName.Text = oContact.FullName
txtMiddleName.Text = oContact.MiddleName
txtLastName.Text = oContact.LastName
txtCompany.Text = oContact.CompanyName
txtAddress.Text = oContact.HomeAddress
txtDOB.Text = oContact.Birthday
txtPhone.Text = oContact.HomeTelephoneNumber
Where I can get those field details in Redemption?
Thanks in advance,
Kumar.
I am able to get the contactItem detils (FullName, CompanyName,
HomeTelephoneNumber, etc.,) using Outlook object model. Because of
the security patch problem, I thought of using Redemption.
In the Redemption SafeContactItem object contain fields like,
Email1AddressType, Email1DisplayName, Email1EntryID, etc. BUT, I am
not able to get the outlook contactItem fields (FullName, CompanyName,
HomeTelephoneNumber, etc.,).
I am using Outlook 2003. Programming language is Visual Basic 6.0. I
am using Redeption version 3.4.
My code sample (using outlook object model):
============================================
Dim oContacts As Object
Dim oContact As Outlook.ContactItem
Set oContacts = olNs.GetDefaultFolder(olFolderContacts)
Set oContact = oContacts.Items.Item(intPos)
txtFullName.Text = oContact.FullName
txtMiddleName.Text = oContact.MiddleName
txtLastName.Text = oContact.LastName
txtCompany.Text = oContact.CompanyName
txtAddress.Text = oContact.HomeAddress
txtDOB.Text = oContact.Birthday
txtPhone.Text = oContact.HomeTelephoneNumber
Where I can get those field details in Redemption?
Thanks in advance,
Kumar.