-1
와 윈도우 업데이트 후 실패
- 상환 : 5.10.0.4312
- 델파이 32분의 2,007
- MS 오피스 365/아웃룩 2016 v1710
윈도우 업데이트를 다운로드 어제 ("기능 업데이트 Windows 10, 버전 1709 ")에서 메일을 보내기위한 사용 코드가 손상되었습니다. 단순화 된 코드는 다음과 같습니다.구속은 MAPI_E_NO_RECIPIENTS
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); // <---- '[email protected]'
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
Redemption을 사용하지 않으면 제대로 작동합니다.
- 다시 시작 윈도우를
- 재 등록 보너스 DLL
- 사용 : 나는 myOutlookItem.Recipients.Add에 myItem.Recipients.Add을 변경하는 경우
, 나는 MAPI_E_AMBIGUOUS_RECIP
도 시도 해 봤나 수 myItem.Recipients.AddEx
- 최신 보너스 버전 시도, 5.15.0.4892
다음에 시도 할 내용에 대한 제안 사항이 있으십니까?
감사
Redemption –