Fehler 10054 beim E-Mail Versand. Fehler in code?

[Karstadt]

hallo. Kann jemand bitte mein Code analysieren und mir helfen. Jedes mal bekomme ich eine FMeldung.

Fehler: Socket-Fehler # 10054
Die Verbindung wurde von Peer zurückgesetzt.

Delphi-Quellcode:

  idPOP31.Host := gesetzt
  idPOP31.Username := gesetzt
  idPOP31.Password := gesetzt

  idPOP31.Connect;
  idpop31.disconnect;

  UserEmail := gesetzt

  IdMessage1.Clear;
  with IdMessage1 do
  begin
    Body.text := gesetzt

    From.Text := UserEmail;         //Absender
    ReplyTo.EMailAddresses := UserEmail;
    Recipients.EMailAddresses := gesetzt

    Subject :=gesetzt


    ReceiptRecipient.Text := gesetzt
  end;


  IdSMTP1.Username := SmtpServerUser;//Welcher Benutzer?
  IdSMTP1.Password := SmtpServerPassword;//Welches Passwort??

  //Generelles Setup
  IdSMTP1.Host := SmtpServerName;//Welchen Host soll ich benutzen?
  IdSMTP1.Port := SmtpServerPort;//Welchen Port soll ich benutzen?


  TIdAttachment.Create(IdMessage1.MessageParts, ZipDatei);

  //Hier wird die Verbindung aufgebaut!
  IdSMTP1.Connect;//Stelle Verbindung her
  

  try
    Try
      IdSMTP1.Send(IdMessage1);//Versuche die Nachrich zu senden

    finally
      IdSMTP1.Disconnect;
  end;
  except
    on e:exception do
    begin
      beep;
      LogMem('Die E-Mail wurde nicht versendet! Fehler: '+e.Message);
      exit;
    end;
  end;

warum...?

[gsh]

hast du einen richtigen smtp-server benutzt?
darfst du auf diesem smtp-server emails versenden?

[Karstadt]

Ja und Ja. Bei Outlock mit gleichen Daten funktioniert das problemlos!

[Sharky]

Zitat von Karstadt:

Ja und Ja. Bei Outlock mit gleichen Daten funktioniert das problemlos!

Hai Karstadt,

weisst Du wie die "Sicherheitseinstellungen" des Servers sind? Bei inigen ist es ja so das man nur dann senden darf wenn man sich vorher via POP3 angemeldet hatte. Und Outlook macht es ja so das es zuerst neue eMails abholt (POP3 Authent) und danach erst sendet.

[SirThornberry]

du solltest vielleicht die Absenderadresse mit angeben?! Bisher gibst du nur den Absendernamen an.

[Karstadt]

Zitat von Sharky:

weisst Du wie die "Sicherheitseinstellungen" des Servers sind? Bei inigen ist es ja so das man nur dann senden darf wenn man sich vorher via POP3 angemeldet hatte. Und Outlook macht es ja so das es zuerst neue eMails abholt (POP3 Authent) und danach erst sendet.

Delphi-Quellcode:

idPOP31.Host := gesetzt
  idPOP31.Username := gesetzt
  idPOP31.Password := gesetzt

  idPOP31.Connect;
  idpop31.disconnect;

[Karstadt]

Zitat von SirThornberry:

du solltest vielleicht die Absenderadresse mit angeben?! Bisher gibst du nur den Absendernamen an.

Name := [e-mail] oder meinst du dass ich auch noch die EMail adresse mit gleichen daten füllen soll.

[Karstadt]

Zitat von gsh:

hast du einen richtigen smtp-server benutzt?
darfst du auf diesem smtp-server emails versenden?

Was meinstdu ist der CODE richtig?

[Sharky]

Ups,

ich sollte nicht mehr schreiben bevor ich den ersten Kaffee getrunken haben.
Dann liegt es eventuell daran was der Sir vermutet. Ohne Absenderadresse geht es nicht.

Wenn Du alles in ein Posting geschrieben hättest und nicht für jedes ein einzelnes hätte ich mir meinen Beitrag sparen können

[Karstadt]

Jetzt funktioniert das! (ich bin jetz aber in Büro) Gestern abend aber nicht! Liegt das vielleicht am Provider. Ich muss aber dazu sagen, gestern wurden ca. 30 Email mit Anhang in eine Stunde versendet die letzten 25 wurden nicht versendet (fehler). Dann habe ich das bei Outlock eingerichtet da hat das funktioniert... Ich verstehe das nicht.


PS: Ich habe nichts am den oberen Code verändert!