Mail versenden über idSMTP funktioniert nicht mehr

[Thomas83]

hi,

bin mir sicher nichts am Server verändert zu haben.
Mir meiner Funktion konnte ich automatisch mails versenden.
Seit ein paar Tagen klappt kein Connect mehr.

Bei mir auf dem Computer funktioniert es. Egal welches Konto ich bei der Anmeldung angebe. Bin Admin. Bei den restlichen Mitarbeiter hängt sich mein Programm auf.

Hier die Funktion

Delphi-Quellcode:

Function SendeMail(....) : Boolean;
var
  idMessage : TIdMessage;
  idSMTP : TIdSMTP;
begin
  result := false;

  idMessage := TIdMessage.Create(nil);
  idSMTP := TIdSMTP.Create(nil);

  idSMTP.Host   := '192.168.100.10';
  idSMTP.Username := 'Doamin\User';
  idSMTP.Password := 'passwort';
  idSMTP.Port   := 25;
  idSMTP.UseEhlo := true;

  idMessage.From.text  :='[e-mail]';
  idMessage.Sender.text:=idMessage.From.text;

  idMessage.Recipients.EMailAddresses:= meineemail;
  idMessage.CCList.Clear;
  idMessage.Subject:='bla';
  end;

  idMessage.Body.Clear;
  idMessage.Body.Text := 'text';

  try
    idSMTP.ConnectTimeout := 5;
    idSMTP.Connect;
    idSMTP.Send(idMessage);
    idSMTP.Disconnect;
    result:=True;
    except on E : Exception do
      begin
        if idSMTP.connected then try idSMTP.disconnect; except end;
        result := false;
      end;
  end;

  idMessage.Free;
  idSMTP.Free;
end;

Muss ich irgend was bei uns am Server (SBS 2003) ändern,
habe keine Ahnung warum das nicht mehr funktioniert.

mfg

[mkinzler]

Zitat:

Delphi-Quellcode:

idSMTP.Password := 'passwort';';

Hier ist was zu viel

[mjustin]

Zitat:

Zitat von Thomas83

Bei mir auf dem Computer funktioniert es. Egal welches Konto ich bei der Anmeldung angebe. Bin Admin. Bei den restlichen Mitarbeiter hängt sich mein Programm auf.

Man kann man sich auf den problematischen Rechnern per Telnet am SMTP Server anmelden, und prüfen ob er Befehle annimmt - und dann eine komplette Mail 'manuell' per Telnet eingeben. (Standardport ist 25).

Eventuell ist der SMTP Server so konfiguriert, dass der kein Relay erlaubt, d.h. keine Mails an andere Systeme weiterleitet. Das muss dann explizit den betroffenen Rechnern in der Serverkonfiguration gestattet werden. Details kenne ich hier leider nicht, bin kein Admin ;)

[Thomas83]

Zitat:

Zitat von mkinzler

Zitat:

Delphi-Quellcode:

idSMTP.Password := 'passwort';';

Hier ist was zu viel

ups, habe ich geändert

[Thomas83]

Zitat:

Zitat von mjustin

Zitat:

Zitat von Thomas83

Bei mir auf dem Computer funktioniert es. Egal welches Konto ich bei der Anmeldung angebe. Bin Admin. Bei den restlichen Mitarbeiter hängt sich mein Programm auf.

Eventuell ist der SMTP Server so konfiguriert, dass der kein Relay erlaubt, d.h. keine Mails an andere Systeme weiterleitet. Das muss dann explizit den betroffenen Rechnern in der Serverkonfiguration gestattet werden. Details kenne ich hier leider nicht, bin kein Admin ;)

Das könnte sein, aber wieso hat es dann vorher funktioniert und von heute auf morgen nicht mehr....
Ich kann mir gut vorstellen das es nur eine kleine konfiguration am Server ist.

[nahpets]

Hallo,

prüf' mal, ob per Virenscanner... eventuell der Port 25 gesperrt worden ist. Das Problem hatte ich auch mal und habe überall gesucht, nur nicht dort. Und wenn das Problem plötzlich un unerwartet überall auftritt, ist sowas recht naheliegend.

[Thomas83]

Zitat:

Zitat von nahpets

Hallo,

prüf' mal, ob per Virenscanner... eventuell der Port 25 gesperrt worden ist. Das Problem hatte ich auch mal und habe überall gesucht, nur nicht dort. Und wenn das Problem plötzlich un unerwartet überall auftritt, ist sowas recht naheliegend.

servus,
:shock: echt der Hammer. Haben hier gdata im Einsatz, was eh sche*** ist. Habe alles was damit zutun hat beendet und siehe da die email wird versendet.....

Super danke Dir, wer weis wie lange ich da noch gesucht hätte.

mfg