>>#DEFINE CR CHR(13) >>WITH oMailItem >>.Subject = "Meeting next week" >>.Body = "Just confirming our meeting on Tuesday at 3." + CR + ; >>"Please bring ideas, as well as your notes from last year's event." >>>>
>>DECLARE INTEGER ShellExecute ; >>IN SHELL32.DLL ; >>INTEGER nWinHandle,; >>STRING cOperation,; >>STRING cFileName,; >>STRING cParameters,; >>STRING cDirectory,; >>INTEGER nShowWindow >> >>lcEmailAddress = ALLTRIM(fcsecure.sc_email) >>lcSubject = "Ticker item question" >>lcMessageBody = "(...comments, question, corrections here...)" + CR + ; >> " Project name: "+ALLTRIM(jobs.jc_name) + CR + ; >> " Project number: "+ALLTRIM(jobs.jc_task) + CR + ; >> " Item description: "+ALLTRIM(v_ticklerpk.t_desc) + CR + ; >> " Due Date: "+DTOC(v_ticklerpk.t_date) + CR + ; >> " Copies: " +ALLTRIM(STR(v_ticklerpk.t_copies)) >> >>ShellExecute(0, "", "mailto:" + lcEmailAddress + "?Subject=" + lcSubject + ; >> "&body=" + lcMessageBody, "", "", 1)>>