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

   Почта.УдалитьСообщения(МассивПолученныхПисем);

   Почта.Отключиться();    

После выполнения письма остаются лежать на почтовом сервере, если все делать не по протоколу IMAP то письма удаляются, но нужен именно IMAP.
Как еще можно удалить письма с почтового сервера используя протокол IMAP?
Программист всегда исправляет последнюю ошибку.