![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Какой компанент использовать для работы на ниском уровне с SMTP.
dimonf © (2002-10-31 18:57:00)Народ, какой компанент использовать для работы с SMTP протоколам на ниском уровне. Я хочу отслеживать какие ответы мне возращает SMTP сервер при попытке передать письмо на конкретный mail адрес.
Reindeer Moss Eater (2002-11-01 10:37:00) [1]>dimonf ©
используй TidTCPClient и его методы ReadLn,Writeln
Мазут Береговой (2002-11-01 07:13:00) [2]Небольшое уточнение
там где ждешь ответа надо так:
While Answer = "" do
begin
Answer:=FSock.Socket.ReceiveText;
Application.ProcessMessages;
end;
грубовато - зато работает
Мазут Береговой (2002-11-01 07:08:00) [3]Ответы ЕСТЬ. Все молчат. Щас Я тебе начирикаю...
Должно быть так :
Address:=...
Port:=25
запрашиваешь соединение:
If not Socket.Active then Socket.Active:=true;
Ждешь ответа:
While not Socket.Active do Application.ProcessMessages;
Как только соединение устанавливается сервер тебе отвечает, а ты читаешь:
Socket.ReceiveText(); типа 220...
Потом отправляешь всякие HELO, EHLO и тому подобное.
Все остальное по выше приведенной схеме...
dimonf (2002-10-31 20:51:00) [4]Народ, неуж-то нет мыслй??? Я не верю!!!
dimonf (2002-10-31 18:58:00) [5]Желательно, компанент из библиотеки Indy.