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

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

Непонятки с отправкой почты Indy9 [D7, WinXP]

Logan ©   (2005-10-07 21:51:00) 

Если я введу 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;


---

Logan   (2005-10-15 15:08:00) [1]

KLAUS ©   (08.10.05 18:39) [3]
Спасибо за ссылочки!!!

---

KLAUS   (2005-10-08 18:39:00) [2]

> а если 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

---

Logan   (2005-10-08 14:52:00) [3]

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

---

Eraser   (2005-10-08 01:50:00) [4]

> Logan ©   (07.10.05 21:51)

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

---

Наверх