Einzelnen Beitrag anzeigen

Rolf Rostig

Registriert seit: 5. Mär 2003
Ort: Stade
117 Beiträge
 
Delphi 7 Professional
 
#1

Mail automatisch versenden

  Alt 3. Jul 2004, 16:51
Hallo,

ich versuche eine Mail mit Anhang über den akt. Mail-Client zu verschicken.

Mit
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  s: String;
begin
s := 'mailto:xy@abc.de?Subject=Thanks&Body=hallo&Attach=""C:\boot.ini""';
ShellExecute(handle, 'open', PChar(s), nil, nil, SW_SHOWNORMAL);
öffnet sich der Mail-Client wie gewünscht.
Nun möchte ich aber, dass die Mail automatisch versendet wird.
Hat jemand eine Idee?
Gruss
Rolf
  Mit Zitat antworten Zitat