Hi

You could also use

=DDESETOPTION("SAFETY",.F.)
gnChanNum = DDEINITIATE("NOTES", "SENDMAIL")
IF gnChanNum != -1
glExecute = DDEEXECUTE(gnChanNum, "NewMessage")
glExecute = DDEEXECUTE(gnChanNum, "Send")
DDETERMINATE(gnChanNum)
EndIif


as some older versions of notes can not be created as objects.

Regards

Steven