Непонятки с отправкой почты Indy9

← →
Logan © (2005-10-07 21:51) [0]

Если я введу xxx.mail.ru, то письмо приходит, а если xxx.narod.ru, то письмо не приходит... в чём может быть дело???
procedure TForm3.RzBitBtn1Click(Sender: TObject); begin try IdMessage1.Recipients.EMailAddresses := IdMessage1.From.Address; IdMessage1.From.Address := edit1.Text;//емаил IdMessage1.Body.Text := Mainform.RichEdit1.Lines.Text;//текст IdMessage1.Subject := edit1.Text;//тема IdSMTP1.AuthenticationType := atNone; IdSMTP1.Host := "smtp.mail.ru"; IdSMTP1.Port :=25; IdSMTP1.Connect; Application.ProcessMessages; try IdSMTP1.Send(IdMessage1); finally IdSMTP1.Disconnect; IdMessage1.MessageParts.Clear; end; except end; end;

← →
Eraser © (2005-10-08 01:50) [1]

> Logan © (07.10.05 21:51)

Очевидно в xxx.narod.ru.

← →
Logan © (2005-10-08 14:52) [2]

А как сделать чтобы можно было письма отправлять на любой ящик???

← →
KLAUS © (2005-10-08 18:39) [3]

> а если xxx.narod.ru, то письмо не приходит... в чём может
> быть дело???

У тебя сервер стоит smtp.mail.ru (IdSMTP1.Host := "smtp.mail.ru";);
Два способа, создай Edit и туда вводи необходимый сервер типа
IdSMTP1.Host:=Edit1.text;
Ну или иди:
http://podgoretsky.com/ftp/Docs/Internet/Semenov/4/44/dns_4412.htm
http://forum.vingrad.ru/index.php?showtopic=49623&view=all

Непонятки с отправкой почты Indy9 Найти похожие ветки