Hi,
In meinem Projekt benutze ich IdPOP3 mit IdSSLIOHandlerSocketOpenSSL.
Nur aus irgendeinem Grund bricht die Verbindung sofort, egal bei welchem Server, mit "Connection closed gracefully" ab (Auch wenn Firewall/
AV deaktiviert).
Habe die Server von Yahoo, GMail und Freenet getestet. Überall das selbe.
Die Meldung "Connection closed gracefully" wird instantan nach idpop31.Connect() ausgegeben.
Ich habe mal per Wireshark mitgeschnüffelt und es findet überhaupt keine Kommunikation statt?!
Hier mein Code:
(Ich benutze Borland Delphi 7 mit
Indy 10)
Delphi-Quellcode:
idssliohandlersocketopenssl1 := Tidssliohandlersocketopenssl.Create(
nil);
idssliohandlersocketopenssl1.SSLOptions.Mode := sslmUnassigned;
idssliohandlersocketopenssl1.SSLOptions.Method := sslvSSLv3;
// Kein Erfolg mit sslvSSLv2
idpop31 := tidpop3.Create(
nil);
idpop31.IOHandler := idssliohandlersocketopenssl1;
idpop31.UseTLS := utUseExplicitTLS;
// Kein Erfolg mit utUseImplicitTLS etc.
idpop31.Host := server;
//Im Vorfeld deklariert, auf jeden Fall richtig
idssliohandlersocketopenssl1.Host := server;
idpop31.Username := user;
//Im Vorfeld deklariert, auf jeden Fall richtig
idpop31.Password := password;
//Im Vorfeld deklariert, auf jeden Fall richtig
idpop31.Port := 995;
idpop31.ConnectTimeout := 5000;
idpop31.ReadTimeout := 5000;
try
idpop31.Connect();
// Hierbei Exception EidConnectionClosedGracefully
memo1.Lines.Add(IntToStr(idpop31.CheckMessages)+'
E-Mails gefunden.');
idpop31.Disconnect();
except
on E :
Exception do
begin
Memo1.Lines.Add('
ERROR: '+E.
Message+'
// '+E.ClassName);
end;
end;
end;
Der Fehler ist mir rätselhaft, zumal mein Programm ja nicht einmal mit dem Server Kontakt aufnimmt
Vielleicht weiß hier einer besser Bescheid
