Einzelnen Beitrag anzeigen

Benutzerbild von JPSelter
JPSelter

Registriert seit: 24. Jan 2005
Ort: Attendorn/Sauerland
235 Beiträge
 
Turbo Delphi für Win32
 
#1

Verbindung mit Mailserver schlägt fehl

  Alt 16. Mär 2007, 12:58
Ich benutze Indy, um eMails auf einen SMTP-Server zu laden. Dabei handelt es sich um einen 1&1 Server mit der Adresse auth.smtp.kundenserver.de. Den SMTP-Auth-Type habe ich auf SMTPAuth gestellt. Hier etwas Code:

Delphi-Quellcode:
case SmtpAuthType of
      0: SMTP.AuthType := atNone; //Normal
      1: SMTP.AuthType := atDefault; //SMTPAuth
      2: begin //AfterPop
         SMTP.AuthType := atNone;
         POP.Host := POPServer;
         POP.Username := POPUser;
         POP.Password := POPPass;
         POP.Port := POPPort;
         POP.Connect();
         POP.Disconnect;
         end;
      3: begin //afterPop+SMTPAuth
         SMTP.AuthType := atDefault;
         POP.Host := POPServer;
         POP.Username := POPUser;
         POP.Password := POPPass;
         POP.Port := POPPort;
         POP.Connect();
         POP.Disconnect;
         end;
    end;
    SMTP.Username := SMTPUsername;
    SMTP.Password := SMTPPass;

    SMTP.Host := SMTPServer;
    SMTP.Port := SMTPPort;

    SMTP.Connect;
    Application.ProcessMessages;
    try
      SMTP.Send(IdMsgSend);
      ...
Er geht überall korrekt durch, nur im SMTP.Send() bleibt er hängen und macht nichts mehr. Aber wieso? Es muss mit dem Auth etwas zutun haben, denn über einen anderen Mailserver (GMX) klappt es. Aber was kann ich noch einstellen? SMTPAuth habe ich schon auf allen Einstellungen 0-3 probiert. Stimmt ein Port nicht? Vielen Dank für Tips!

EDIT: Ich sollte den Aufruf noch angeben:

Delphi-Quellcode:
sendNewsLetter(
                  adressaten,
                  textausrichedit,
                  'smtp-user',
                  titel,
                  'mphigh',
                  'text/html',
                  'auth.smtp.kundenserver.de',
                  'smtp-user',
                  'smtp-pw',
                  25,
                  3,
                  'pop.kundenserver.de',
                  'pop-user',
                  'pop-pw',
                  110,
                  titel2);
=JPSelter=

Visit www.ditonovia.de for our breathtaking movies: Herrin der Ringe (Fantasy 2005), Hemisphere (Science-Fiction 2004) & Braveknife (Parodie 2001) and more...
  Mit Zitat antworten Zitat