Redemption: Would like to get To-value

[Steffen Grellmann]

Hi newsgroup,

I'm trying to change this code for use with redemption. How do I have
to change the code to get it working?

MsgBox ActiveInspector.CurrentItem.To

Sue Mosher has been so kind to post the following but I'm not sure how
I have to declare the 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.To
Next


Kind regards,

Steffen

 

[Dmitry Streblechenko]

Set rMsg = CreateObject("Redemption.SafeMailItem")
rMsg.Item = ActiveInspector.CurrentItem
ActiveInspector.CurrentItem.Save
MsgBox rMsg.To

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

 

[Steffen Grellmann]

Hi Dmitry,

thank you for replying! This is exactly what I was looking for.

But: Is there a way to avoid saving the item?

Why works this only in Outlook and not in Word if using "Send to"?

Kind regards,

Steffen

 

[Dmitry Streblechenko]

Extended MAPI doesd not see the changes until Outlook writes the data from
its internal buffers to the message store, there is no way around it.
Do you mean you do not get an active inspector when your are using "Send To"
from Word? Outlook does not expose inspectors modally shown by Simple MAPI.

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

 

[Steffen Grellmann]

Hi Dmitry,

thank you for replying.

Do you mean you do not get an active inspector when your are using "Send To"
from Word?

Yes, but why and how can I use an active inspector using "Sent To" in
Word?

Kind regards,

Steffen

 

[Dmitry Streblechenko]

You can't to the best of my knowledge: Outlook jumps through the hoops to
hide the inspector shown modally by the Simple MAPI code from its object
model.

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool