Redemption: Would like to get To-value

  • Thread starter Thread starter Steffen Grellmann
  • Start date Start date
S

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
 
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
 
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
 
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
 
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
 
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
 
Back
Top