Ich probiere schon eine ganze Weile mit IdPOP3 E-Mails von 1und1 abzufragen.
Mit diesem Code:
Delphi-Quellcode:
FIdPOP3.IOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(FIdPOP3);
FIdPOP3.Host:=FHost;
FIdPOP3.Port:=FPort;
if FUseSSL then
begin
case FUseTLS of
tppNoTLS: FIdPOP3.UseTLS:=utNoTLSSupport;
tppImplicitTLS: FIdPOP3.UseTLS:=utUseImplicitTLS;
tppRequireTLS: FIdPOP3.UseTLS:=utUseRequireTLS;
tppExplicitTLS: FIdPOP3.UseTLS:=utUseExplicitTLS;
end;
end;
FIdPOP3.Username:=FUsername;
FIdPOP3.Password:=FPassword;
//while not Terminated do
begin
FIdPOP3.Connect;
MailCount:=FIdPOP3.CheckMessages;
if MailCount > 0 then
begin
DoOnCheckMessage(FGUID, MailCount);
end;
FIdPOP3.Disconnect;
Sleep(2000);
end;
Es will mir nicht gelingen. Ich habe schon alle TLS-Varianten mit den Ports 465 und auch mit 587 (welcher es sein sollte) probiert.
Alles was ich bekomme ich
Zitat:
Socket-Fehler # 10061 Verbindung abgelehnt
Könnte mir irgendwer sagen was ich falsch mache?
Gruß Hobbycoder