' $System.Access Write Where
' Set $User = $Users.$ID
' If $System.IsPost
' $Command.Where.Memo
' If $User.Mail and ($User.Where.MemoMethod = Mail)
' $System.Redirect $Server?page=WhereMemoSent&gid=$GID
' Else
' $System.Redirect $Server?page=WhereHistory&id=$ID&gid=$GID
' EndIf
' Exit
' EndIf
$Office.Name - Memo
' Init $GID = $User.Group.ID
' If ($User.Where.MemoMethod = Mail) or ($User.Where.MemoMethod = Both)
' If $User.Mail and ! $Office.Server.SMTP
$User.Name chooses to receive a Memo by Email.
To receive a Memo by Email, you need to set up SMTP Server first.