Entwickler-Ecke

Internet / Netzwerk - Email funktioniert zuhause, aber nicht auf der Arbeit


sunshineh - Mi 10.12.08 22:51
Titel: Email funktioniert zuhause, aber nicht auf der Arbeit
Hallo,

ich nutze die Indy 10 Komponenten und versende in meinem Programm im Fehlerfall eine Email.
Zuhause kann ich meine Email versenden, aber auf der Arbeit funktioniert es nicht.
Ich habe bei der Arbeit in der EDV angerufen und wenn sie "alles freischalten" dann funktioniert es dort auch, aber wenn sie nur Port 25 freigeben (den habe ich im Delphi-Programm eingestellt), dann geht es nicht.
Was muss ich denen sagen, was genau sie freigeben müssen?

Gruß und Danke


mkinzler - Mi 10.12.08 22:54

Wo steht der SMTP-Server? Welches Protokoll? Welche Komponenten? Code?


sunshineh - Mi 10.12.08 23:11

Code sieht wie folgt aus:


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
    IdSMTP1 := TIdSMTP.Create;
    EMail := TIdMessage.Create;
    IdSMTP1.Host := smtp.web.de;
    IdSMTP1.Username := XXX@web.de;
    IdSMTP1.Password := XYZ;
    IdSMTP1.Port   := 25;

    EMail.Clear;
    EMail.Date := Now;
    EMail.From.Name := XXX@web.de;
    EMail.From.Address := XXX@web.de;
    EMail.ReplyTo.Add.Address := XXX@web.de;
    EMail.Recipients.Add.Address := XXX@web.de;
    EMail.Subject := Betreff_XYZ;
    EMail.Body.Text := BlaBla;

    IdSMTP1.Connect;
    IdSMTP1.Send(EMail);
    IdSMTP1.Disconnect;