ONDATE 1,"* * 1 * *","GOTO MyFunc" Function New_Email() $EmailTo$ = "Johnsmith@email.com" $EmailCC$ = "mark@email.com" $EmailSubject$ = STR$ tag@ + STR$ year@ + STR$ month@ + " Report" $EmailBody$ = "" $EmailBody$ = $EmailBody$ + "Third Line " + CHR$(13) + CHR$(10) // the CHR$(13) + CHR$(10) is the same as newline $EmailBody$ = $EmailBody$ + "Second Line" + CHR$(13) + CHR$(10) // Second line of email $EmailBody$ = $EmailBody$ + "Third Line" + CHR$(13) + CHR$(10) // Third Line of email... ect $EmailBody$ = $EmailBody$ + "Time: " + TIME$ + CHR$(13) + CHR$(10) // Gives the full date when this was sent // Want to include data such as graphs as an attachment? see: https://ewonsupport.biz/ebd/ $EmailAttachment$ = "&[$dtUF$uf/usr/" + STR$ tag@ + STR$ year@ + STR$ month@ + ".csv$ftT]" $EmailContents$ = $EmailBody$ + $EmailAttachment$ SENDMAIL $EmailTo$, $EmailCC$, $EmailSubject$, $EmailContents$ Print "mail sent" Endfn