SMTP mit SMTP-AUTH ohne Betreff und Absender.

[d1ng0d0gt0r]

Hi,

hab mich mal an einem kleinen SMTP-Clienten versucht.

Ich kann mich wunderbar am SMTP Server anmelden auch mit SMTP-Auth.
Das versenden der Mails geht auch wunderbar.

Nur wenn die Mail ankommt, dann fehlt der Empfänger und der Betreff sowie die Nachricht ansicht.

Im Anhang findet ihr den Sourcecode.
Vielleicht hat jmd. eine Idee woran es liegen könnte.

Gruß d1ng0

[marabu]

Hi,

wenn du Empfänger, Absender und Betreff in deinem Mail Client sehen möchtest, dann musst du die entsprechenden Header mitsenden:

Delphi-Quellcode:

begin
  // ...
  tcp.SendLn('From: SenderRealName');
  tcp.SendLn('To: RecipientRealName');
  tcp.SendLn('Subject: How to send mail without reading rfc821');
  tcp.SendLn(''); // End of header section
  tcp.SendLn('MessageText');
  tcp.SendLn('.');
  // ...
end;

Grüße vom marabu

[d1ng0d0gt0r]

Code:

How to send mail without reading rfc821

Danke ;) - Hab es anhand eines PHP Scripts herausgefunden.

[Counter909]

könntest du den code vllt nochmal ohne fehler posten ?


und warum kommt bei mir immer, dass "socket.dcu" nicht gefunden werden kann ?

[Counter909]

*push*

ist keiner mehr mit diesem thread bewandelt ? ^^
bei mir kommt immer socket.dcu :-(

[Looking4Clues]

Zitat:

Zitat von Counter909

*push*

ist keiner mehr mit diesem thread bewandelt ? ^^
bei mir kommt immer socket.dcu :-(

<< Schau mal an, da links steht bei mir Delphi 5 professional :-)

Und was steht da bei Dir?

Genau, Du benutzt C## unter Solaris. Mist, wie konnte ich das nur übersehen... ;-)

mfg

[Counter909]

:P ich benutze nur Delphi 7

aber das Problem hatte ich schonmal bei einem anderen Source, in dem Tut ging es um einen ganz normalen Email-Sender , aber bei mir fehlt immer diese "socket.dcu" und ich hab keine ahnung, woran das liegt :wall:

[Looking4Clues]

Zitat:

Zitat von Counter909

:P ich benutze nur Delphi 7 :wall:

Freut mich, da ich hin und wieder auch Delphi 7 benutze. Allerdings nur die PE-Version, die aber nicht mit Deiner Enterprise/Architect-Version vergleichbar ist, die unter Solaris läuft.

Da unsere beiden Delphi 7-Versionen offensichtlich nicht die gleichen sind und noch dazu unter unterschiedlichen Betriebssystemen laufen, kann ich Dir leider nicht weiterhelfen :-)

mfg

[marabu]

Hallo,

Zitat:

Zitat von Counter909

... warum kommt bei mir immer, dass "socket.dcu" nicht gefunden werden kann? ...

liegt die für die Komponenten TCPClient und TCPServer benötigte Unit SOCKETS im LIB-Verzeichnis deiner Delphi-Installation?

Grüße vom marabu

[Counter909]

genau das ist wohl der Punkt :roll:
die hab ich nicht...kann ich die i.wo runterladen ?

aber sonstige indy komponenten habe ich ja...


mfg
counter

[marabu]

Du irrst, das hat nichts mit Indy zu tun. Sockets.dcu ist eine Borland Unit, die in Verbindung mit den Komponenten in Package DCLNET70.BPL benötigt wird. Mag sein, dass du eine Personal Edition verwendest und dort diese Komponenten garnicht zum Lieferumfang gehören. Dann bleibt dir nur eine Adaption der entsprechenden Indy-Komponenten.

[Counter909]

genau ich hab delphi 7 personal!

was meinst du mit "Adaption der entsprechenden Indy-Komponenten" ?


kann ich nicht die unit dann nachträglich runterladen bzw eintragen ?

[marabu]

Ich glaube nicht, dass du dir die Unit SOCKETS einfach irgendwo besorgen kannst.

Mit "Adaption ..." meinte ich, dass du dir die Indy-Komponenten installierst und dann den dir vorliegenden Code so anpasst, dass er auch nach dem Ersetzen von TTCPClient durch TIdTCPClient weiter funktioniert. Die Änderungen dürften nicht so dramatisch sein.