我一般定义只有测试人员才能关闭缺陷。
if (Bug_Fields("BG_STATUS").IsModified and _
(Bug_Fields("BG_STATUS").Value = "已关闭") and _
(User.IsInGroup("测试人员") or _
User.IsInGroup( "测试负责人"))) then
Bug_Fields("BG_CLOSING_DATE").value= date ?
end if
[ 本帖最后由 shhuangfy 于 2008-6-23 18:18 编辑 ]