Declare INTEGER ShellExecute ; IN SHELL32.DLL ; INTEGER nWinHandle,; STRING cOperation,; STRING cFileName,; STRING cParameters,; STRING cDirectory,; INTEGER nShowWindow if used("cur_email") sele cur_email use endif SELE 0 CREAT CURSOR cur_email (ctipo C(1), lcMessageBody m) append blank cwTo = "" lcEmailAddress = cwTo lcCCAddress = "" lcSubject = "Report by " + allt(empresa.empresa) repl lcMessageBody with '<html>' + ThisForm.olehtml.document.Body.innerHTML+'</html>' m.filehtm = "resumo_pronto.htm" ShellExecute(0, "", "mailto:" + lcEmailAddress + "?Subject=" + lcSubject + "&body=" + cur_email.lcMessageBody + "&cc=" + lcCCAddress, "", "", 1) if used("cur_email") sele cur_email * use endifAny advice will be welcome.. TIA