General discussion


outlook 2000 + redemption

By eddy.dartois@vandemoortel ·
I'm trying to get the e-mail addresses from the outlook 2000 address book through code like this (it works but I get the security warning):

Dim oSession As MAPI.Session
Dim oRecps As MAPI.Recipients
Dim oRecp As MAPI.Recipient
Dim oAddr As MAPI.AddressEntry

'open a CDO session
Set oSession = New Session
'take the same session
oSession.Logon , , , False
'get the same item

Set oRecps = oSession.AddressBook( _
Title:="Select Attendees", _
forceResolution:=True, _
recipLists:=1, _
toLabel:="&To") ' appears on button
For Each oRecp In oRecps '<= here we have the security warning for accessing addresses
Debug.Print oRecp

Can anybody help me to replace this code with redemption objects ?
I already use redemption for sending mails, but I don't manage to use this for retrieving addresses.

Thanks in advance

This conversation is currently closed to new comments.

Thread display: Collapse - | Expand +

All Comments

Collapse -

Try Technical Q&A forum.

by deepsand In reply to outlook 2000 + redemption

This is a tech. problem, in search of a solution.

It properly belongs in "Technical Q&A," not in "Discussions." Please re-post there.

Not only will you be more likely to attract the attention of those seeking to provide answers, but you will also make it easier for those seeking discussions to find such.

Thank you..

Related Discussions

Related Forums