> IF ThisForm.chkComments.Value > .MsgNoteText = "Add your comments then press Send" > .Send(.T.) > ELSE > .MsgNoteText = "See Attached Error File" > .Send(.F.) > ENDIF > ** Gotta Figure out how to tell if sucessfull! > lnAnswer = MESSAGEBOX("The Error File was sucessfully e-mailed."; > +CHR(13)+"It is not needed by the system any more."; > +CHR(13)+"Do you want to DELETE it now?",; > 32+0+4,"System Message") > IF lnAnswer = 6 AND FILE((lcAppDir + "\PjtManEr.txt")) > DELETE FILE (lcAppDir + "\PjtManEr.txt") RECYCLE > ENDIF