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