INDY SMTP SERVER <- wie, was, wo, warum....brauche hilfe

[SirThornberry]

habt ihr schonmal die suche hier im forum benutzt?? ich hab schonmal nen smtp-server mit quellcode gepostet

[doc]

ich auch nicht wirklich so, wie ichs will, kannn mir ma einer meine frage (oben) beantworten, oda geht des garnet? wär cool

[Meflin]

den code gibts hier:
http://www.delphipraxis.com/topic104...ht=smtp+server
allerdings sagtest du ja selber dass der nicht so gut funktioniert!

[SirThornberry]

Der code für die smtp-serverkomponente funktioniert schon, was nicht so supi funktionierte war das dns-lookup nach dem zielmailserver aber da gibts nen demo bei den indies (vollständig funktionierend) mit dem der fehler behoben werden kann

Im Gunde genommen funktioniert das ganze, nur die realisierung von dem dns-lookup nach dem mailserver ist nicht die feine englische art. Da werden einfach alle dns-lookupresults durchprobiert. Man müsste also nur aus dem dnslookup-result die mailserver einträge raussuchen

[Meflin]

achso! allerdings ist in dem quelltext so ziemlich jeder code auskommentiert! deswegen kennt man sich da n bisserl schlecht aus, was nötig ist und was nicht!

[SirThornberry]

du musst einmal den TIDSmtpserver nehmen um die mail zu empfangen
im OnReceiveMessage

Delphi-Quellcode:

aMsg.ProcessHeaders; //header hinzufügen
{
TIDSMTP verwenden um aMsg an den Server zu schicken
1.: RCPT.Count durchgehen //die empfängerliste
1.1: prüfen ob schon an die domäne von rctp.items[count] gesendet wurde. wenn nicht dann weiter mit 1.2 ansonsten hier den schleifendurchlauf abbrechen
1.2: Zielmailserver mit dns-lookup rausfinden (mx-record)
1.3: amsg an zielmailserver mit hilfe von TIDSMTP weitersenden

}

Das auskommentierte kann übrigens raus aus dem Quelltext
Hatte damals nur keine zeit das zu machen und hab einfach mein ganzes projekt wies war gepostet
Wenn das auskommentierte weg ist sollte es auch übersichtlicher sein

Größtes Problem bei dem ganzen ist nicht der smtp-server sondern das dns-lookup

[SirThornberry]

hmm, hatte eignetlich grad was gepostet dazu aber war weg
also erstmal alles auskommentierte rausnehmen - da wirds viel übersichtlicher

im event OnReceiveMessage
 aMsg.ProcessHeaders; anschließend alle Empfänger durchgehen (aMsg.Recipients.count)
dabei beachten das die mail nicht 2 mal an den selben server geschickt wird.
wenn du also eine mail an
[e-mail]
und
[e-mail]
schickst dann brauchst du die mail nur einmal an den mailserver von yahoo schicken weil yahoo sieht das es an beide leute geht und somit die mail in beide postfäscher schiebt

[Edit]*lol* jetzt ist das andere post doch da. Vielleicht könnte nen admin das ja mit zu dem anderen beitrag schieben und den löschen[/Edit]

[GuenterS]

Zitat von SirThornberry:

du musst einmal den TIDSmtpserver nehmen um die mail zu empfangen
im OnReceiveMessage

Delphi-Quellcode:

aMsg.ProcessHeaders; //header hinzufügen
{
TIDSMTP verwenden um aMsg an den Server zu schicken
1.: RCPT.Count durchgehen //die empfängerliste
1.1: prüfen ob schon an die domäne von rctp.items[count] gesendet wurde. wenn nicht dann weiter mit 1.2 ansonsten hier den schleifendurchlauf abbrechen
1.2: Zielmailserver mit dns-lookup rausfinden (mx-record)
1.3: amsg an zielmailserver mit hilfe von TIDSMTP weitersenden

}

Das auskommentierte kann übrigens raus aus dem Quelltext
Hatte damals nur keine zeit das zu machen und hab einfach mein ganzes projekt wies war gepostet
Wenn das auskommentierte weg ist sollte es auch übersichtlicher sein

Größtes Problem bei dem ganzen ist nicht der smtp-server sondern das dns-lookup

Hallo, da hätte ich grad auch eine Frage zu.

Die IdSMTPServer Komponente ist quasi etwas was Emails entgegennimmt und diese soll man dann je nachdem wohin sie gehen soll an den dafür zuständigen Mailserver senden. Bei [e-mail] an yahoo.de und bei [e-mail] an gmx.at. Ok gut, das könnte ja die IdSMTP Komponente machen. Nur wie gehe ich mit Authentifizierungen um? Man kann ja schlecht bei jedem Anbieter einen Account haben?