Email per AUTH SMTP versenden

[webby]

Das wär wirklich besser! :)

Ich hab davon aber noch nie zuvor gehört. Gibt es da genauere Anregungen irgendwo im Netz? Also wie ich zum Beispiel direkt dorthin die Mail versenden kann?!

[Sharky]

Zitat:

Zitat von webby

Das wär wirklich besser! :)

Ich hab davon aber noch nie zuvor gehört. Gibt es da genauere Anregungen irgendwo im Netz? Also wie ich zum Beispiel direkt dorthin die Mail versenden kann?!

Sorry, das ich erst heute antworte, ich war zwei Tage auf einer Schulung.

Also, das versenden direckt an den Empfänger Server ist eigentlich ganz einfach....

Du brauchst "nur die IP-Adresse des Mailservers" und diese trägst Du dann bei deiner eMail-Kompo als HOST ein.

Aber wie kommst Du an die IP-Adresse?
Dazu musst du eine DNS-Abfrage machen. Du brauchst also die IP-Adresse eines DNS-Server (aber den bekommst Du ja immer von deinem Provider zugewiesen. Ansonsten gibt es genug bekannte IPs).

Jetzt machst Du folgendes.

Du holst dir aus der eMail Adresse des Empfängers die Domaine.
z.B.: [e-mail]

Das wäre dann gmx.de

Jetzt musst Du prüfen ob es einen oderer mehrere MX-Einträge (MessageExchange) für diese Domaine gibt.

Wenn ja wird dir von dem DNS-Server entweder die IP oder ein DNS-Name des bzw. der Mail-Server zurückgegeben.

Wenn es keinen MX-Eintrag gibt ist es in der Regel so das Du die Mail an den Typ-A Eintrag der MailDomaine.

Uff.... das ist echt schlecht beschreiben.

Von Synapse gibt es eine DNS-Unit Die alle Funktionen hat die Du benötigst.

Schaue sie dir mal an. Damit habe ich das gelöst. Ich mache das ganze dann in Threads und versende so immer 10 eMail "gleichzeitig".

Bei Frage melde dich einfach noch einmal.

[F.Art]

Ich empfehle dir nim die Indy Kombonente damit habe ich auch gute erfolge gehabt.

Delphi-Quellcode:

idMessage.Clear;
idSMTP.AuthenticationType:= atLogIn;
idSMTP.Host                      := Host.Text;
idSMTP.Username                  := Username.Text;
idSMTP.Password                  := Passwort.Text;
idMessage.Sender.Text:= (AbsenderName.Text)+' <'+(AbsenderEmail.Text)+'>';
idMessage.ReplyTo.EMailAddresses:= ReplyTo.Text;
idMessage.Subject := Betreff.Text;
idMessage.Body.Add(Nachricht.Text);
idMessage.Recipients.EMailAddresses:= EmfaengerEmail.Text;
idMessage.From.Address:= AbsenderEmail.Text;
idSMTP.Connect;
idSMTP.Send(idMessage);
idSMTP.Disconnect;

[masters001]

@ F.Art kannst bitte nen Beispiel posten wie man mit der Indy Dateianhänge verschickt?

Bei gmx klappt bei mir jetzt alles nachdem ich wie von Sharky beschrieben auf der site SMTP after POP mit IP prüfung eingestellt hab.

Aber ich hab nochn Problem mit freenet, die server sind
pop3.freenet.de und mx.freenet.de so hab ich die jedenfalls bei outlook eingestellt und da funktionierts.
Aber irgendwie gehts bei meinem Programm nicht.

Auf der site hab ich schon nachgeschaut nach einstellungsmöglichkeiten wie die bei gmx, gibts da auch noch irgendwelche tricks um mails über freenet zu verschicken?
Vielen Dank
masters001

[F.Art]

bei freenet musst du authlogin machen und username ist [e-mail] und das passwort.

Delphi-Quellcode:

TidAttachment.Create(idMessage.MessageParts,Datei.Text);

[webby]

@Sharky: Ich werde, wenn ich wieder mal Zeit habe das genauer nachprüfen. Ich glaube aber ich hab soweit alles verstanden! THX

[dopeline]

habe mich mal dem code bedient. danke!!!

kann mir jemand sagen, wie ich ne message ausgeben lassen kann, die angibt, ob der mailversand erfolgreich oder nicht erfolgreich abgeschlossen wurde?

gibt es da vielleicht ein onSended oder so?


Gruß, dopeline

[nouna]

Hallo
könnte mir jemand bitte sagen wie sicher AUTH SMTP (Indy) ist ?? wenn mann weiss dass SMTP sicherheitslücken hat!!!!
:gruebel:

[sakura]

Zitat:

Zitat von nouna

könnte mir jemand bitte sagen wie sicher AUTH SMTP (Indy) ist ?? wenn mann weiss dass SMTP sicherheitslücken hat!!!!

In AUTH SMTP wird ein Random Schlüssel zusammen mit dem Passwort des Users gehasht. Dieser Code wird dann zur Authentifizierung versandt - und ist recht sicher. Allerdings werden alle anderen Daten immer noch im Klartext versand (SMTP halt).

...:cat:...

[nouna]

dake für die Antwort :balloon: