Приведенный ниже пример от Кевина Реттинга работает хорошо, меня беспокоит только то, что в Outlook исходный eamil перенаправляется на учетную запись gmail, но мы хотим сохранить сообщение в Outlook и переслать копию в Gmail.
Я написал некоторый VBA-скрипт для этого * обхода отключения автопересылки на сервере ". Разрешено ли мне публиковать в основном это здесь, учитывая, что имитирует пользователя, пересылающего электронную почту, а не сервер, делающий автопродвижение.
Это довольно просто:
Sub AutoForwardAllSentItems(Item As Outlook.MailItem) Dim strMsg As
String Dim myFwd As Outlook.MailItem
Set myFwd = Item.Forward
myFwd.Recipients.Add "email@email.com" myFwd.Send Set myFwd = Nothing
End Sub
Это выходит за рамки этого поста, чтобы дать подробные инструкции, но вот доска объявлений программирования?резюме:
Добавьте приведенный выше код в редактор Visual Basic Outlook (Alt-F11 должен начать работу). Обязательно измените email@email.com на адрес, по которому вы хотите, чтобы почта отправлялась
Скажите Outlook, чтобы он запускал этот код для каждого входящего сообщения (Инструменты -> Правила и оповещения -> Новое правило -> Проверять сообщения по мере их поступления -> Далее -> ДА -> Флажок "Запустить сценарий" -> Затем выберите сценарий создано.
Теперь Outlook должен автоматически пересылать каждое полученное вами электронное письмо, но оно не будет заблокировано администратором как "автоматическая пересылка".`` `