Problem mit email abholen

[Natcree]

Hallo möchte über mein Programm emails abholen hier mal der erste teil meines codes

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not IdPOP31.Connected then
  begin
    IdPOP31.Host := 'pop.1und1.de';
    IdPOP31.Port := 110;
    IdPOP31.Username := '****@**********.de';
    IdPOP31.Password := '**********';
    IdPOP31.Connect;
  end
  else
    IdPOP31.Disconnect;
end;

er sagt mir nur Connection closed Gracefully stellt aber keine verbindung her

[Sherlock]

Hast Du SSL aktiviert?

Sherlock

[Natcree]

bei 1und1 ja im programm selber nicht wie mache ich das?

[mkinzler]

Schau mal nach idPop3.AuthType, idPop3.UseTLS. GGf, mußt du dann noch den Port anpassen.

[DeddyH]

Und die entsprechenden DLLs braucht man auch, oder hat sich das mittlerweile geändert (ich benutze kein Indy)?

[Natcree]

unter authtype hat er kein usetls

[baumina]

Welche Indy-Version verwendest du?

[Uwe Raabe]

Vielleicht steht hier ja was brauchbares drin: http://www.delphipraxis.net/131165-i...d-ssl-wie.html

[Natcree]

Habe den code jetzt wie folgt geändert

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not IdPOP31.Connected then
  begin
    IdPOP31.Host := 'pop.1und1.de';
    IdPOP31.Port := 995;
    IdPOP31.UseTLS := utUseImplicitTLS; 
    IdPOP31.Username := '****@**********.de';
    IdPOP31.Password := '**********';
    IdPOP31.Connect;
  end
  else
    IdPOP31.Disconnect;
end;

und noch zusätzlic den idssliohandlersocketopenssl auf die form gelegt jetzt sagt er was anderes
could not load ssl library

[mkinzler]

Dann fehlt ihm die OpenSSl Dll