문제 Microsoft Outlook의 전자 메일 경고 피하기

Question

전자 메일로 보내려는 Microsoft Access의 레코드 집합이 있습니다. 이메일 기능이 훌륭하게 작동합니다. 메시지가 보낼 준비가 될 때마다 경고 메시지가 나타나고 사용자는 보낸 모든 전자 메일에 대해 "허용"또는 "거부"를 클릭해야합니다. 해결 방법을 찾아서 튜토리얼을 따라 왔습니다 : http://www.everythingaccess.com/tutorials.asp?ID=Outlook-Send-E-mail-Without-Security-Warning.
제 문제는 메시지에 함수를 넣을 때 항상 false를 반환하고 메시지가 실패한다는 것입니다. 어떤 도움을 주시면 감사하겠습니다.

Dim sendMail As Boolean 
Dim strMessage As String 
strMessage = Some Message 
sendMail = FnSafeSendEmail(![Email Id], "Subject", strMessage) 

전체 "FnSafeSendEmail"기능은 제공된 링크에서 찾을 수 있습니다. 그러나 이것은 매개 변수입니다.

Public Function FnSendMailSafe(strTo As String, _ 
          strCC As String, _ 
          strBCC As String, _ 
          strSubject As String, _ 
          strMessageBody As String, _ 
          Optional strAttachments As String) As Boolean 

오류, "개체가이 속성 또는 메서드를 지원하지 않습니다", 함수의이 라인에 발생합니다.

Dim blnSuccessful As Boolean 
blnSuccessful = objOutlook.FnSendMailSafe(strTo, strCC, strBCC, _ 
              strSubject, strMessageBody, _ 
              strAttachmentPaths) 

Answer 1

해결. Microsoft Outlook의 트러스트 센터에서 매크로에 대한 보안 검사를 사용하지 않도록 설정해야했습니다.