Klappt alles einwandfrei mit web.de, wenn es richtig eingestellt ist
Delphi-Quellcode:
object IdSMTP1: TIdSMTP
IOHandler = IdSSLIOHandlerSocketOpenSSL1
Host = '
smtp.web.de'
Password = '
***password***'
Port = 587
SASLMechanisms = <>
UseTLS = utUseRequireTLS
Username = '
***email-address***'
Left = 80
Top = 72
end
Den SSL-IO-Handler braucht man nur auf die Form klatschen und an die IdSMTP-Komponente hängen, die Einstellungen werden automatisch angepasst und sollten dann so aussehen:
Delphi-Quellcode:
object IdSSLIOHandlerSocketOpenSSL1: TIdSSLIOHandlerSocketOpenSSL
Destination = '
smtp.web.de:587'
Host = '
smtp.web.de'
MaxLineAction = maException
Port = 587
DefaultPort = 0
SSLOptions.Mode = sslmUnassigned
SSLOptions.VerifyMode = []
SSLOptions.VerifyDepth = 0
Left = 200
Top = 88
end
und hier der Code um die Nachricht zu versenden:
Delphi-Quellcode:
procedure TForm1.Button1Click( Sender : TObject );
begin
IdSMTP1.Connect;
try
if IdSMTP1.Authenticate
then
IdSMTP1.Send( IdMessage1 );
finally
IdSMTP1.Disconnect( True );
end;
end;
//EDIT:
Man muss natürlich die
Indy-Kompatiblen-OpenSSL-Bibliotheken im Anwendungs-Verzeichnis oder irgendwo im Pfad haben, sonst geht schon mal gar nichts
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)