Текущий архив: 2003.03.27;
Скачать: CL | DM;
Вниз
Email Server Найти похожие ветки
← →
Dmitriy_R (2003-02-03 12:59) [0]Народ подскажите кто знает что не так. Положил на форму компонент ServerSocket настроил его на слушание 25 порта.
Взял почтовую программу и пытаюсь отправить, прога коннектится но по событию:
procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
Var Text: string;
begin
//
Text := Socket.ReceiveText;
Memo1.Lines.Add(Text);
end;
В мемо ничего не идет, пытался отправить клиенту приветствие HELLO и еще много чего что нащел на этом сайте, но ничего не выходит.
← →
gsu (2003-02-03 13:02) [1]А где остальное ?
← →
Романов Р.В. (2003-02-03 13:07) [2]http://sendmail.by.ru/documents/SMTP.htm
← →
Dmitriy_R (2003-02-03 13:18) [3]ДАк со сылкой все понятно описание и здесь есть http://delphi.mastak.ru/articles/smtp/index.html
но вот проблемма примером былобы проще, а так тяжко.
Как я понял после того как клиент подключился к серверу, сервер должен отправить первым или что-то дождатся.
← →
Digitman (2003-02-03 14:28) [4]
> после того как клиент подключился к серверу
об этом факте говорит событие OnClientConnect()
> сервер должен отправить первым
Вот и отправляй то, что требуется по протоколу, в событии OnClientConnect()
> или что-то дождатся
А вот на этот случай как-раз и OnClientRead() существует
← →
Digitman (2003-02-03 14:31) [5]
> > после того как клиент подключился к серверу
точней даже не в OnClientConnect() , а при 1-м возникновении OnClientWrite().
последующие OnClientWrite() так же могут возникнуть, но итерпретируются они несколько по другому
← →
SeNtiMeL (2003-02-05 03:08) [6]В общем читай спецификацию SMTP и POP3.
Там все описано, какие команды используется и как происходит процесс.
Я сам писал подобную вещь, только не серевер а клиент к USENET протоколу (NNTP).
Просто читаешь спецификацию протокола и все ! Там все грамотно изложено.
Страницы: 1 вся ветка
Текущий архив: 2003.03.27;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.009 c
