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
user@gmx.net schicken. Du hast die EMail adresse
user2@web.de 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