>Hi all,
>
>Sometimes mail doesn't get delivered as fast as we'd like, so I was wondering if there was a way to automatically insert a date/time stamp at the bottom of my email messages. I can't find anything in Outlook itself, but was wondering if there was some kind of add-on that does this.
>
>Thanks much,
>
>John

John,

I should have included more of an example in my previous message.........

SELECT * from machines WHERE modelname='Greg' INTO CURSOR temp
loOutlook = CREATEOBJECT('outlook.application')
lcBody =FILETOSTR('email.htm') && .htm file created in Word 2000
SCAN
  loEmailItem=loOutlook.createItem(0)
  loEmailItem.To=temp.email1
  loEmailItem.Subject='This is the subject'
  dtstamp=TTOC(DATETIME())
  datetimestamp='<p><b><fontsize="5">Date/Time '+dtstamp+',</font></b></p>'
  loEmailItem.HTMLBody=lcbody+datetimestamp
  loEmailItem.Send
ENDSCAN
loOutlook=.null.
RELEASE loOutlook	
CLOSE DATABASES