Thema: Delphi Html Emails + Listbox

Einzelnen Beitrag anzeigen

horst

Registriert seit: 1. Jul 2003
347 Beiträge
 
Delphi 2007 Professional
 
#1

Html Emails + Listbox

  Alt 17. Nov 2003, 19:18
erklär mir das bitte mal jemand, wenn ich das so mache dann wird eine html email versendet. in memo1.text steht der html-source
Delphi-Quellcode:
 for i := 0 to (Listbox1.items.count - 1) do
      Listbox1.items[i] := extractfilepath(application.exename) + edit13.text;
     sendNewsLetter(an, Listbox1.items, memo1.text, 'test@www.de', 'Test', 'mpnormal', 'text/html', 'mail.server.com', 'user', 'pass', 25, 0);
wenn so dann werden keine html emails versendet, kommen nur als text an.
Delphi-Quellcode:
edit13.Text:=worddocname + xdatuma + '.doc';
 files := Tstringlist.Create;
 f:=edit13.text;
 files.Add(f); // TString einen Wert zuweisen
    sendNewsLetter(an, files, memo1.text, 'test@www.de', 'Test', 'mpnormal', 'text/html', 'mail.server.com', 'user', 'pass', 25, 0);
  Mit Zitat antworten Zitat