Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Почтовый робот [D5, Win95/98, WinME, NT4, Win2k, WinXP]


RedArc ©   (2002-06-19 17:36:00) 

Здравствуйте! Захотелось мне написать на Delphi почтового робота VirtualMan, который выполняет следующие функции:
1. Проверяет почту на нескольких почтовых серверах (MAIL.RU, HOTMAIL.RU, YAHOO.COM, CHAT.RU, ...)
2. Если в почтовых ящиках на этих серверах есть письма с определённой темой сообщения, например: "РАССЫЛКА", то копия этого письма рассылается по списку рассылки, который хранится роботом. Если тема "Add Рассылка", то адрес отправителя заносится в список рассылки, если "Del Рассылка", то адрес отправителя удаляется из списка рассылки.
3. Проверяет также письма по списку "чёрных" адресов и удаляет такие письма с сервера. Под определением "чёрный" адрес надо понимать адреса назойливых спамеров.
4. Входит на новостные сайты и ищет там письма по ключевым словам, типа "программирование, Delphi, советы, faq". Если найдены такие письма, содержащие ключевые слова в заголовке или в теле письма, то робот должен пересылать(копировать) эти письма в заданный почтовый ящик, например, на HOTMAIL.RU
5. В соответствии со списком знаменательных дат (дни рождения, годовщины, ...) выбирать случайным образом открытку в формате JPG из указанного каталога на диске и отсылать имениннику по почте с вставкой в тело письма случайного поздравления, выбранного из соответствующего тематике текстового файла. В случае общих праздников (Новый год, 8 Марта, ...) составлять аналогичным образом поздравительное письмо с открыткой из JPG и отправлять это поздравление по списку рассылки, а также по всем известным роботу адресам.
6. Письма с определёнными адресами пересылать на другой почтовый сервер. Это нужно для того, например, чтобы отсортировать служебную переписку от приватной.

Как такое чудо можно сделать на Delphi? Подскажите, пожалуйста, где и чего можно прочитать по этому поводу в инете. особенно буду благодарен за советы и конкретные примеры кода.


RedArc   (2002-06-20 17:23:00) [1]

2:Ghost
Спасибо огромное за ссылку. Буду изучать.
да, я хотел бы, чтобы почта частично обрабатывалась прямо на сервере (убийство спама, пересылка приватных мессаг на другой адрес, изменение списка рассылки etc). И аттачи нужны, чтобы открытки пересылать или архивы какие-ниубудь, например, с интересной, но большой статьёй.
Неужели это настолько сложно? Я в смысле объёма. Мне казалось, что весь алгоритм робота должен крутиться вокруг двух-трёх методов.

2:Malder
Правильнее сказать, я смог поместить в папку "Исходящие". Однако письмо не отправляется никакими судьбами. Может быть забыл что-нибудь указать в полях служебной информации?
Мне аттачи тоже были бы желательны. А почту мне хотелось бы прямо на сервере тоссить...


Ghost.   (2002-06-20 13:55:00) [2]


> Malder ©

Он как я понял как раз забирать их хочет не все и работать с ними восновном на сервере не скачивая, тут именно КлиентСокет любой,а как раз готовые компоненты половину из этого не позволят сделать..например, чтобы сгенерировать открытку со встроенной в нее картинкой и отправить NMSMTP совсем не подойдет, а делал подобное но не в таком обьеме конечно..


Malder   (2002-06-20 13:39:00) [3]

Максимум, что я смог добиться - помещение письма в папку "Отправление".

Вот опять непонятки. Ты смог только поместить письмо в папку отправленные Outlook"а ? А при чем здесь он ? Тебе нужно самому организовать "общение" с почтовым сервером. Протокол изучать, конечно, не надо, хотя приведенную статью прочитать хорошо было бы. Посмотри в сторону компонентов NMPOP3 и NMSMTP (закладка FastInternet или как-то так). Правда, они достаточно нефункциональные, но если в письме не будет аттачей (прикрепленных файлов), то сгодятся. С помощью NMPOP3 ты будешь забирать письма с сервера. Потом будешь обрабатывать. Затем, с помощью NMSMTP будешь уже отсылать эти письма куда надо.


Ghost.   (2002-06-20 13:12:00) [4]

Да ссылочки тут тебе врядли помогут тебе нужно хорошо изучить сам протокол..
http://www.sources.ru/protocols/pop3_learning.shtmlнапример тут
и опять же как вариант в кладовке есть пример проги котопая проверяет почту


RedArc   (2002-06-20 12:59:00) [5]

2:Ghost
Компоновка - дело десятое. Думаю, что справлюсь. Для пользователей я этого робота не планировал. Хочу для себя такую штуку. А вот за ссылочки на статьи и примеры был бы очень благодарен. Заранее огромное спасибо.


Ghost.   (2002-06-20 12:52:00) [6]

Да вобшем ничего особенно сложного нет, проблемы возникнут при компоновке всего этого добра вместе и делать его нормальным для пользователя, а так ...протокол РОР3 почитай там найдешь то, что тебе нужно, а вот обработка полученной информации будет более трудоемкая


RedArc   (2002-06-20 12:43:00) [7]

2:Malder
Не знаю с чего начать :(
Я почтовых программ не писал никогда...
А хочется...

2:Slym
Я нарисовал...

Почитал статьи о работе с email. Попробывал примеры. Ничего не работает :( Максимум, что я смог добиться - помещение письма в папку "Отправление".


Slym   (2002-06-20 06:39:00) [8]

Я также занимаюсь разработкой такого робота, только для рассылки анекдотов через маил гейты на пейджера.
1. Забирает почту (подписан на рассылку анекдотов)
2. Парсирует анекдоты и рассылает их по списку.
3. ++ отсылает при сбоях евент лог на пейджер админа (меня)
4. проверяет почту админа, отсылает заголовок на пейджер,
если текст менее 400б отослать на пейджер все письмо.
5. Поздравляет с праздниками на автомате.

в принципе ничего сложного :)
сначала нарисуй все это на бумаге очень помогает


Malder   (2002-06-20 02:40:00) [9]

Ну ты даещь. За тебя что ли все написать ? Ты скажи, в чем проблема то ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо