S
StevePurvey
My program is a VB6 add-in for Outlook 2000,2002,2003
I am using Redemption to overcome the security issues. I need to
access the members of Private address lists within contact folders,
specifically I need to access the contact mobile telephone number.
The following code extracts some of the .member properties but not all
are available.
'The following loop gets the contacts from the DistList in the folder
ElseIf sType = "DistListItem" Then
Set myDistList = oContactFolder.Items.Item(intA)
For intB = 1 To myDistList.MemberCount
sAddress = myDistList.GetMember(intB).Address
sName = myDistList.GetMember(intB).Name
sEntry = myDistList.GetMember(intB).EntryID
Next intB
End If
My question is, is there a way of extracting the mobile telephone
number??
Many thanks
Steve P
I am using Redemption to overcome the security issues. I need to
access the members of Private address lists within contact folders,
specifically I need to access the contact mobile telephone number.
The following code extracts some of the .member properties but not all
are available.
'The following loop gets the contacts from the DistList in the folder
ElseIf sType = "DistListItem" Then
Set myDistList = oContactFolder.Items.Item(intA)
For intB = 1 To myDistList.MemberCount
sAddress = myDistList.GetMember(intB).Address
sName = myDistList.GetMember(intB).Name
sEntry = myDistList.GetMember(intB).EntryID
Next intB
End If
My question is, is there a way of extracting the mobile telephone
number??
Many thanks
Steve P