R5下禁止用户使用本区邮件数据库发送邮件

[erer00]

目前公司内实行邮件管控,要求在客户端上用户不能用本区邮件数据库(抄本)发邮件,只能用服务器上的信箱发.

目前服务器上的信箱设计已改好了,用户抄写服务器上的信箱建立的本区信箱继承了服务器上的信箱的设计是发不了邮件的
即设计里的传送按钮 click事件 代码为
SUB Click(Source As Button)
…..
…..
Set db=session.CurrentDatabase
If(db.Server=””) Then Msgbox”不允许本区传送信件”
Exit Sub
….
…..

但聪明点的用户可以更改本区的设计,然后就可以用本区发了
请问有什么方法可以禁止用户更改本区的设计？或者用代理等方法在用户变更了本区的设计后自动更变回来或者检测到设计变更后自动在变更后的设计中加上判断是否本区的script

以上功能要求在客户端实现,不能在Domino服务器上进行设置(老板要求的,我想捏死他)
本人接触notes开发时间比较短,只好请各位大虾帮忙看看了.