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

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

SMTP

bolotov ©   (2003-06-17 09:14:00) 

Мастера, помогите с таким делом. Задача следующая: отправить письмо и когда получатель его откроет, получить автоответ. Делаю следующее: на форме idSMTP и idMessage из комплекта Indy.
Код:

With idMessage Do Begin
From.Name := "Spam Robot";
From.Address := "Email_1";
Recipients.EMailAddresses := "Email_2";
Subject := "This is subject of Message";
ReplyTo.EMailAddresses := "Spam Robot <EMail_1>";
Body.Add("This is Body of Message");
ReceiptRecipient.Address := "EMail_1;
End;

With idSMTP Do Begin
Host := "SMTP Server;
Connect;
( idMessage)

Мастера, помогите с таким делом. Задача следующая: отправить письмо и когда получатель его откроет, получить автоответ. Делаю следующее: на форме idSMTP и idMessage из комплекта Indy.
Код:

With idMessage Do Begin
From.Name := "Spam Robot";
From.Address := "Email_1";
Recipients.EMailAddresses := "Email_2";
Subject := "This is subject of Message";
ReplyTo.EMailAddresses := "Spam Robot <EMail_1>";
Body.Add("This is Body of Message");
ReceiptRecipient.Address := "EMail_1;
End;

With idSMTP Do Begin
Host := "SMTP Server;
Connect;
Send(idMessage);
Disconnect;
End;

Все работает, почта уходит, а автоответ не приходит. Что делать, где чего подкрутить надо?

---

Anatoly Podgoretsky   (2003-06-17 10:48:00) [1]

А кто тебе позволит отсылать подтверждение, например у нас это запрещено приказом.

---

Palladin   (2003-06-17 10:42:00) [2]

мозги

---

Наверх