0
Zixxx
23.04.12
✎
14:36
|
Почта = Новый ИнтернетПочта;
Почта.Подключиться(Профиль, ПротоколИнтернетПочты.IMAP);
Почта.ТекущийПочтовыйЯщик = "inbox";
ЭлектронныеПисьма = Почта.Выбрать(Ложь);
МассивПолученныхПисем = Новый Массив;
Для ин = 0 По ЭлектронныеПисьма.Количество() - 1 Цикл
МассивПолученныхПисем.Добавить(ЭлектронныеПисьма[ин]);
МассивПолученныхПисем.Добавить(ЭлектронныеПисьма[ин].Идентификатор[0]);
КонецЦикла;
Почта.УдалитьСообщения(МассивПолученныхПисем);
Почта.Отключиться();
После выполнения письма остаются лежать на почтовом сервере, если все делать не по протоколу IMAP то письма удаляются, но нужен именно IMAP.
Как еще можно удалить письма с почтового сервера используя протокол IMAP?
|
|