2017-11-20 2 views
-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

다음에 시도 할 내용에 대한 제안 사항이 있으십니까?

감사

+1

Redemption –

답변

1

Windows 업데이트는 MAPI 정렬 화에 대한 책임을 일부 레지스트리 키를 쓸어 것으로 알려져있다. https://groups.yahoo.com/neo/groups/Outlook-Redemption/conversations/topics/9600에서 레지스트리 수정 프로그램을 설치하거나 Outlook을 다시 설치해보십시오.

+0

"Outlook 다시 설치"공급 업체에 문의 해보십시오. 아야! :-) –

+0

레지스트리 수정을 시도 했습니까? –

+0

예, 레지스트리 수정으로 문제가 해결되었습니다 :-) – Xaz