здравствуйте, как с помощью rom-mail.dll получать только не прочтенные письма?

що?

Если делать так то загружаются все письма(прочтенные/не прочтенные).Задача стоит в том что бы загружать только новые письма(не прочтенные.
Для Индекс=1 По Объект_Почта.КоличествоСообщений() Цикл          
   Объект_Почта.ПолучитьЗаголовок(Индекс);
   Объект_Почта.ПолучитьСообщение(Индекс);  
       Объект_Почта.ОставлятьНаСервере
       Для Инд=1 По Объект_Почта.КоличествоФайлов() Цикл
       АдресОтправителя    = СтрЗаменить(Объект_Почта.АдресОтправителя, "SMTP:", "");
       ИндексПоиска        = Объект_Почта.ПолучитьИмяЗаголовка(Индекс) + АдресОтправителя;
       ЗаголовокПисьма            =Объект_Почта.ПолучитьИмяЗаголовка(Индекс);
       Если Объект_Почта.
               ФормТабПочты.НоваяСтрока();
               ФормТабПочты.ЗаголовокПисьма    = ЗаголовокПисьма;
               ФормТабПочты.АдресОтправителя    = АдресОтправителя;
               ФормТабПочты.ИндексПоиска        = ИндексПоиска;
               ФормТабПочты.ДатаОтправки        = Объект_Почта.ДатаОтправки;
               рез = Объект_Почта.ПолучитьФайл(Инд);    
               Объект_Почта.КаталогВложений=имяКат;
               Объект_Почта.СохранитьФайл(Инд,);  
               Колоночка=(ФормТабПочты.ПолучитьПараметрыКолонки("ПолноеИмяФайла"));
               ФормТабПочты.УстановитьЗначение(Инд,Колоночка,имяКат+рез);
           //    ИмяПриемника    = КаталогИБ() +"ReestrBank\"+рез;
           //Фс.КопироватьФайл(имяКат+рез, ИмяПриемника, 0);
           КонецЦикла;
КонецЦикла;

Объект_Почта.ОставлятьНаСервере=1;
Для Индекс=1 По Объект_Почта.КоличествоСообщений() Цикл          
   Объект_Почта.ПолучитьЗаголовок(Индекс);
   Объект_Почта.ПолучитьСообщение(Индекс);
       Для Инд=1 По Объект_Почта.КоличествоФайлов() Цикл
       АдресОтправителя    = СтрЗаменить(Объект_Почта.АдресОтправителя, "SMTP:", "");
       ИндексПоиска        = Объект_Почта.ПолучитьИмяЗаголовка(Индекс) + АдресОтправителя;
       ЗаголовокПисьма            =Объект_Почта.ПолучитьИмяЗаголовка(Индекс);
               ФормТабПочты.НоваяСтрока();
               ФормТабПочты.ЗаголовокПисьма    = ЗаголовокПисьма;
               ФормТабПочты.АдресОтправителя    = АдресОтправителя;
               ФормТабПочты.ИндексПоиска        = ИндексПоиска;
               ФормТабПочты.ДатаОтправки        = Объект_Почта.ДатаОтправки;
               рез = Объект_Почта.ПолучитьФайл(Инд);    
               Объект_Почта.КаталогВложений=имяКат;
               Объект_Почта.СохранитьФайл(Инд,);  
               Колоночка=(ФормТабПочты.ПолучитьПараметрыКолонки("ПолноеИмяФайла"));
               ФормТабПочты.УстановитьЗначение(Инд,Колоночка,имяКат+рез);
           КонецЦикла;
КонецЦикла;