Redemption: How to get To-value from new E-Mail (newbie)

[Steffen Grellmann]

Hi Newsgroup,

how can I get the values from the To/Cc/Bcc-fields of a new (unsent)
mail using Redemption?

A code example would be highly appreciated.

Thank you for your time and help.

Kind regards,

Steffen

 

[Sue Mosher [MVP-Outlook]]

If you already have an object variable for that message named objMsg:

objMsg.Save
Set rMsg = CreateObject("Redemption.SafeMailItem")
rMsg.Item = objMsg
For Each recip in rMsg.Recipients
MsgBox recip.Name & vbCrLf & recip.Address & vbCrLf & recip.Type
Next

Type tells you whether it's a To, Cc, or Bcc.

 

[Steffen Grellmann]

Hi Sue,

thank you very much for replying.

If you already have an object variable for that message named objMsg:

objMsg.Save
Set rMsg = CreateObject("Redemption.SafeMailItem")
rMsg.Item = objMsg
For Each recip in rMsg.Recipients
MsgBox recip.Name & vbCrLf & recip.Address & vbCrLf & recip.Type
Next

Type tells you whether it's a To, Cc, or Bcc.

Could you please complete how I have to declare the object variable
for that message named objMsg? Sorry, I'm new to this kind of stuff.

Your time and help is highly appreciated.

Steffen