Добрый день!
Я через vba в outlook отправляю письма, всё работает отлично.
Вот мой макрос:
Set OutlookApp=CreateObject("Outlook.Application")
Set SM=OutlookApp.CreateItem(olMailItem)
SM.TO=qwe@qwe.ru
SM.Subject="Тема"
SM.Body ="Текст письма"
SM.Send
Но есть проблема, в организации настроено шифрование всех исходящих писем. (Если зайти в outlook в Сервис-Центр Управления безопасностью - Защита электронной почты, там включены галки Шифрование электронной почты). Для отправки на внешние адреса, в письме вручную, требуется это шифрование отключать.
Вопрос в том, как отключать данное шифрование с помощью макроса и потом снова включать.
Заранее спасибо.