email ohne smtp

[XHelp]

Die einfachste lösung ist php script...
du erstellst mail.php. Darein schreibst du:

Code:

   <?php
      
   $additional="From: $sender\nReply-To: $sender\nX-Priority: $priority\nContent-Type: text/plain; charset=\windows-1252\\nContent-Transfer-Encoding: 8bit";
         
   mail ($to, $subject, $mail_text, $additional);
   
   echo "[b]Thanks, mail sended or tryed to send
[/b]";

   ?>

Jetzt muss du den script irgendwohin uploaden (z.B. www.domain.de/mail.php)

Mal angenomen du willst eine EMail an [e-mail] schicken. Du hast die EMail adresse [e-mail] und das soll ein ganz normales brief werden...

Dann greifst du mit TidHTTP (aus Indy: http://www.indyproject.org/) auf den link:

http://www.domain.de/mail.php?to=use...ail_text=HALLO, DAS IST NUR EIN TEST


Ich habe das mal ausprobiert. Edit1 - To, Edit2 - From, SpinEdit1 - Priority, Edit3 - Subject, Memo1 - Text

dann mache ich:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  s:string;
begin
  s:=Memo1.Lines.Text;

  Memo1.Lines.Text:=IdHTTP1.Get('http://bananenbunker.de.beta.mtw.ru/mail.php?to=' +
Edit1.Text + '&sender=' + Edit2.Text +'&priority=' + InTToStr(SpinEdit1.Value) +
'&subject=' + Edit3.Text + '&mail_text=' + s);

end;

Es klappt alles!

Ne andere möglichkeit ist dann nur IMAP