Redemption Senden fehlschlägt, nachdem Windows Update mit MAPI_E_NO_RECIPIENTS

Question

• Redemption: 5.10.0.4312
• Delphi 2007/32
• MS Office 365/Outlook 2016 v1710

Ein Windows Update heruntergeladen gestern ("Feature-Update zu Windows 10, Version 1709 ") hat Redemption Code zum Senden von E-Mails gebrochen. Der vereinfachte Code lautet:

OutlookApp := GetActiveOleObject(Outlook_Application_Class); 
OLNameSpace := OutlookApp.GetNameSpace(MAPI_NAMESPACE); 
OLNameSpace.Logon; 

myOutlookItem := OutlookApp.CreateItem(olMailItem); 
myItem := CreateOLEObject(Redemption_SafeMailItem_Class); 
myItem.Item := myOutlookItem; 

myRecipient := myItem.Recipients.Add(toRecipient); // <---- 'test@testing.com' 
myRecipient.Type := olTo; 
myItem.Recipients.ResolveAll; // <----------- myItem.Recipient count = 0 

myItem.Subject := AMessage_Subject; 
myItem.Body := AMessage_Body; 

myItem.Send; // <--- ERROR: Error in IMessage.SubmitMessage: MAPI_E_NO_RECIPIENTS 

Wenn ich Redemption nicht verwende, funktioniert es richtig.

Wenn ich myItem.Recipients.Add zu myOutlookItem.Recipients.Add ändern, erhalte ich MAPI_E_AMBIGUOUS_RECIP

Habe auch versucht:

• Wenn Sie Windows
• Neuregistrierung Redemption DLL
• Verwendung myItem.Recipients.AddEx
• Probieren Sie die neueste Redemption-Version, 5.15.0.4892

Irgendwelche Vorschläge, was als nächstes zu versuchen?

Dank

Answer 1

Windows-Update ist bekannt für MAPI Rangier verantwortlich einige Registrierungsschlüssel auszulöschen. Sie können versuchen, das Registrierungsupdate von https://groups.yahoo.com/neo/groups/Outlook-Redemption/conversations/topics/9600 zu installieren, oder versuchen, Outlook neu zu installieren.