0

When ever I save a mail to a local path on the system, it breaks, meaning that subject, from mail and other information gets lost.

This started only a few weeks ago, and until then the code has been working for years.

I've tried to short down the code to include the relevant code in the question.

Dim oRMail As Object
Dim oExplorer As Explorer
oExplorer = m_oUtilities.OutlookApp.ActiveExplorer


oRMail = New Redemption.SafeMailItem
oRMail.Item = oExplorer.Selection;

oRMail.SaveAs(strPath, 3)

Have any one else had this problem? I use Outlook 365 64bit, Windows 10.

marc_s
  • 732,580
  • 175
  • 1,330
  • 1,459
Carsten Løvbo Andersen
  • 26,637
  • 10
  • 47
  • 77
  • Where does the selected item come from? Is it a received or composed item? Have you tried using the Outlook object model with the [MailItem.SaveAs](https://learn.microsoft.com/en-us/office/vba/api/outlook.mailitem.saveas) method instead? Does it work correctly? – Eugene Astafiev Sep 30 '22 at 16:43
  • Is this in online mode? – Dmitry Streblechenko Sep 30 '22 at 21:41

1 Answers1

0

Some recent changes in the MSEMS provider cause a call to IMessage::GetProps (which Redemption uses to retrieve multiple properties in a single call) to fail the whole call rather than return an error for a particular property in the returned array.

Please send a message to redemption (at) dimastr (dot) com and I will send you a version with a fix.

Dmitry Streblechenko
  • 62,942
  • 4
  • 53
  • 78