Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Получение новых писем

Автор: PingWiN0x20 15.6.2008, 22:58

Всем привет!
Может я плохо искал, но вроде бы не нашел инфы на эту тему.

Как с помощью TIdPOP3 получить с сервера только заголовки только новых писем?

Автор: Matematik 16.6.2008, 16:19

Плохо искал http://forum.vingrad.ru/topic-71499.html

Автор: PingWiN0x20 16.6.2008, 21:38

Я немножко не дообъяснил..... я не буду загружать письма..... мне нужно сделать что-то вроде GMail Notifire.... чтобы узнавать, какие письма были прочитаны, а какие нет не скачивая их.

Автор: sai_NT 16.6.2008, 22:09

Повнимательнее читай лин, который дал Математик.

Код


IdPOP3.RetrieveHeader(i, msg); // получить заголовки письма

Метод RetrieveHeader отправляет команду TOP, не скачивая полностью письма. Не закачав хедера письма, ты не узнаешь ИД. Дальше все описано в вышеприведенном линке.

Автор: Matematik 21.6.2008, 18:00

Есть еще метод.
У аутлука подсмотрел

Код


+OK POP3 ready <[email protected]>

USER ******

+OK

PASS *****

+OK 34 messages (467536 bytes)

STAT

+OK 34 467536

LIST

+OK 34 messages
1 11266
2 13771
3 8222
4 16206
5 17069
6 11704
7 22149
8 11847
9 8033
10 49233
11 1769
12 4291
13 5983
14 15094
15 9186
16 17067
17 11249
18 11511
19 28721
20 17715
21 15346
22 4932
23 21925
24 4000
25 6137
26 4193
27 15699
28 35607
29 14532
30 34720
31 7696
32 4150
33 4141
34 2372
.

UIDL 1

+OK 1 119

UIDL

+OK 34 messages
1 119
2 122
3 123
4 124
5 125
6 126
7 127
8 128
9 129
10 130
11 131
12 132
13 133
14 134
15 135
16 136
17 137
18 138
19 139
20 140
21 141
22 142
23 143
24 144
25 145
26 146
27 147
28 148
29 149
30 150
31 151
32 152
33 153
34 154
.

RETR 34

+OK 2372 bytes will follow
Return-Path: 
тут письмо
.

QUIT

+OK CommuniGate Pro POP3 Server connection closed

команда UIDL выдает уникальный ID сообщения в ящике

В Indy реализовано в методе .UIDL()