Einzelnen Beitrag anzeigen

EDatabaseError

Registriert seit: 11. Mai 2005
Ort: Göppingen
1.238 Beiträge
 
Delphi 2007 Professional
 
#7

Re: Über Programm eMail versenden D3

  Alt 29. Apr 2006, 10:30
Delphi-Quellcode:
procedure TForm1.WebIE1Click(Sender: TObject);
var
   mailtext : String;
begin
 mailText := 'Text';
 with SMTP do begin
  DocInput.Headers.Add('From', 'tobias@engineering-hocke.de');
  DocInput.Headers.Add('To', 'tobias@engineering-hocke.de'); // Hier sind nicht genug wirkliche Parameter.
  DocInput.Headers.Add('Subject', 'Test');
  RemoteHost := 'mail';
 end;
  SMTP.SendDoc,,mailText;
end;
Hat die Fehleranzahl gesenkt.
Tobias
It's not a bug, it's a feature.
  Mit Zitat antworten Zitat