Пересылка письма в виде вложения
Пересылка писем в Microsoft Outlook имеет несколько режимов - можно цитировать исходный текст письма, либо вкладывать оригинальное письмо в виде вложения. Зачастую требуется комбинировать и при пересылки каждый раз переключать опции в настройках. Используя плагин Potolook можно выбирать нужный режим при выполнении шаблона.
Откройте нужный шаблон (клавиша F11) и перейдите в секцию Шаблоны/Простой текст/Переслать. В конец секции введите следующий код:
<%
if(Quest('Вложить исходное письмо?')){ var fso = glob("Scripting.FileSystemObject");
var TempDir = GetTempDir()+'\\\\msgdir';
if(!fso.FolderExists(TempDir)){
fso.CreateFolder(TempDir + '\\\\');
}
om.SaveAs(TempDir + '\\\\1.msg', 3 /*olMSG*/);
nm.Attachments.Add(TempDir + '\\\\1.msg');
try{fso.DeleteFolder(TempDir, true);}catch(e){}
}
%>
Теперь при пересылке письма будет задан вопрос:

При положительном ответе в пересылку будет вложено исходное письмо в виде аттачмента. Для того, чтобы исключить повторное добавление вложения, следует установить опцию Сервис/Параметры/Настройки/Параметры почты/при пересылки сообщения как включить текст исходного сообщения.


