Board index » delphi » Email code for TPW

Email code for TPW

Does anyone have a piece of code to email a text file to an email address?

David Gillespie
gilles...@dnet.co.uk
ICQ# 10553329

 

Re:Email code for TPW


JRS:  In article <356b144...@royan.d-n-a.net> of Tue, 26 May 1998
20:11:32 in comp.lang.pascal.borland, "David Gillespie (Fragster)"

Quote
<gilles...@dnet.co.uk> wrote:
>Does anyone have a piece of code to email a text file to an email address?

Rather than incorporating mail-handling code in your Pascal, you **may**
be able to Exec a call of an existing DOS-level mail program.  On a
machine I used to use, something like
   Exec(GetEnv('COMSPEC'), '/c MAIL -sSubj -uRecipient < ' + FileName) ;
would have done the job.

Well, for TPW, WinExec, and you may want to use a PIF too.

--
John Stockton, Surrey, UK.    j...@merlyn.demon.co.uk    Turnpike v1.12    MIME.
  Web <URL: http://www.merlyn.demon.co.uk/> - TP/BP/&c. FAQqish topics & links.
  Timo's TurboPascal <A HREF="ftp://garbo.uwasa.fi/pc/link/tsfaqp.zip">FAQ</A>.
  <A HREF="http://www.merlyn.demon.co.uk/clpb-faq.txt">Mini-FAQ</A> of c.l.p.b.

Other Threads