schlumpfger Absent Member.
Absent Member.
2924 views

How to get birthday from Contact / AddressItem

Hello,

I´m trying to get the birthday from a contact. I get almost all information by using the code below. What i´m missing is the birhday and the user defined fields.

How do I get them?

Thanks, Daniel


Dim objApplication As New GroupwareTypeLibrary.Application2
Dim objAccount As GroupwareTypeLibrary.Account2

objAccount = objApplication.Login()

If objAccount IsNot Nothing Then

'For each addressbook
For n = 1 To objAccount.AddressBooks.Count

'for each AddressbookEntry
For i = 1 To objAccount.AddressBooks.Item(n).AddressBookEntries.Count


'For each Item
For a = 1 To objAccount.AddressBooks.Item(n).AddressBookEntries.Item(i).Fields.Count

MsgBox(objAccount.AddressBooks.Item(n).AddressBookEntries.Item(i).Fields.Item(a).Name.ToString)

next
next
next
Labels (1)
0 Likes
3 Replies
Highlighted
Anonymous_User Absent Member.
Absent Member.

Re: How to get birthday from Contact / AddressItem

Is the book the system address book?
Those fields are not available on the SAB.
Do the fields exist on the entry?

>>> On Tuesday, June 15, 2010 at 5:26 AM,

schlumpfger<schlumpfger@no-mx.forums.novell.com> wrote:

> Hello,
>
> Ím trying to get the birthday from a contact. I get almost all
> information by using the code below. What ím missing is the birhday and
> the user defined fields.
>
> How do I get them?
>
> Thanks, Daniel
>
>
> Dim objApplication As New GroupwareTypeLibrary.Application2
> Dim objAccount As GroupwareTypeLibrary.Account2
>
> objAccount = objApplication.Login()
>
> If objAccount IsNot Nothing Then
>
> 'For each addressbook
> For n = 1 To objAccount.AddressBooks.Count
>
> 'for each AddressbookEntry
> For i = 1 To
> objAccount.AddressBooks.Item(n).AddressBookEntries.Count
>
>
> 'For each Item
> For a = 1 To
> objAccount.AddressBooks.Item(n).AddressBookEntries.Item(i).Fields.Count
>
>
>

MsgBox(objAccount.AddressBooks.Item(n).AddressBookEntries.Item(i).Fields.Ite

> m(a).Name.ToString)
>
> next
> next
> next

0 Likes
schlumpfger Absent Member.
Absent Member.

Re: How to get birthday from Contact / AddressItem

It´s the Personal Addressbook. I´ve activated and set the birthday on the private/personal register of the contact.

If I open the addressbook beyond tools and select the personal addressbook and add a userdefined field it works. But if I open the addressbook from the tree on the left side of groupwise and add a personal field there it isn´t available.

Whats the matter of that?

Thanks, Daniel
0 Likes
pankajthapa Absent Member.
Absent Member.

Re: How to get birthday from Contact / AddressItem

hey do you got the answer because I am also stucked on it
I cant access birthday field form addresssbookentry field and also anniversary field please help
should I use addressbookentry object to access all the field or any thing else please help guys
0 Likes
The opinions expressed above are the personal opinions of the authors, not of Micro Focus. By using this site, you accept the Terms of Use and Rules of Participation. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.) and Hewlett Packard Enterprise Company. As of September 1, 2017, the Material is now offered by Micro Focus, a separately owned and operated company. Any reference to the HP and Hewlett Packard Enterprise/HPE marks is historical in nature, and the HP and Hewlett Packard Enterprise/HPE marks are the property of their respective owners.