oOutLook = CREATEOBJECT( 'Outlook.Application' )
oNameSpace = oOutlook.GetNameSpace( 'MAPI' )
*** Create a new mail item
oMsg = oOutlook.CreateItem( olMailItem )
WITH oMsg
  *** Set the required message properties
  .Subject = ( 'Fox Rocks!' )
  .Body = ( 'Hi Ken. You are doing a great job. Keep up the good work!' )
  *** Add the recipients
  .Recipients.Add( 'KLevy@Microsoft.com' )
  .Recipients[ 1 ].Type = 1
  *** And send it off
  .Send()
ENDWITH