Сохранение отправленных писем из 1С в папке «Отправленные» по imap

Появилась необходимость сохранять отправленные из 1С письма на веб-почте yandex, в папке Отправленные
для реализации использую протокол IMAP — настройки надо прописать в 1С, в учетной записи электопочты
дописал несколько модулей, все работает )

все дописки связаны с передачей Профиля подключения к почте в процедуру отправки, это не сложно
главная дописка в модуле «РаботаСПочтовымиСообщениямиСлужебный», в процедуре «ОтправитьСообщение» в самом конце, перед Возврат_ом

//Антон { сохранить письмо в Отправленных
Если ЗначениеЗаполнено(Профиль.АдресСервераIMAP) Тогда
    ИнтернетПочта = Новый ИнтернетПочта;
    ИнтернетПочта.Подключиться(Профиль, ПротоколИнтернетПочты.IMAP);
    ИнтернетПочта.ТекущийПочтовыйЯщик = "Отправленные";
    ИнтернетПочта.Послать(Письмо,, ПротоколИнтернетПочты.IMAP);
    ИнтернетПочта.Отключиться();
КонецЕсли;
//---}

Добавить комментарий