почему не отправляется почта

[alman12]

почему не отправляется пишет что (SMTP is available only with SSL or TLS connection enabled.)

вот код

begin
 idSMTP1.Host := 'smtp.mail.ru';
  idSMTP1.Port := 25;
  idSMTP1.Username:= 'Host@yahoo.com';
  idSMTP1.Password:= 'password';
  IdMessage1.From.Address:='Host@yahoo.com';
  IdMessage1.From.Name:= 'text';
  IdMessage1.Subject :=  'Test';
  IdMessage1.Body.Text := 'the body is going to test';
  IdMessage1.Recipients.EMailAddresses:='mail@inbox.ru';

  try
    try
     idSMTP1.Connect;
     idSMTP1.Authenticate;
     idSMTP1.Send(IdMessage1);
    except on E:Exception do
      Memo1.Lines.Insert(0, 'ERROR: ' + E.Message);
    end;
  finally
    if idSMTP1.Connected then idSMTP1.Disconnect;
  end;
end;

[Stilet]

Подключи SSL компоненты.
http://www.programmersforum.ru/showthread.php?t=195828
http://www.programmersforum.ru/showthread.php?t=265796

[alman12]

как подключит ?

[Человек_Борща]

Почитать темы на которые дали ссылки. Там написано как подключать.

[alman12]

скачаль ssleay32.dll и libeay32.dll но не отправляется

[Stilet]

Компоненты на форму SSL ные кинул? С Indi связал?

[alman12]

как связать

[Stilet]

Я же дал выше ссылки: http://www.programmersforum.ru/showp...87&postcount=2

[alman12]

помогите !

я не понел

добавил зти

IdSMTP1.IOHandler := IdSSLIOHandlerSocketOpenSSL1;
IdSSLIOHandlerSocketOpenSSL1.SSLOpt ions.Method := sslvTLSv1;
IdSMTP1.UseTLS := utUseExplicitTLS;

но не отправляется

тепер не пишет что ( SMTP is available only with SSL or TLS connection enabled)

но не отправляется на почту текст

почему не отправляется на емаил

[indexx]

По тому что ты не программист. Хотел дать подсказку, но не дам, ибо НЕ ФИГ!