51Testing软件测试论坛

标题: 自定义工作流控制附件权限 [打印本页]

作者: mengxb001 时间: 2006-7-6 15:14
标题: 自定义工作流控制附件权限
关于附件权限问题：

前几天在回答一个问题是后错误回答了那个问题，发这个帖子让
大家来看看如何通过自定义工作流来控制附件添加，修改和删除权限
我以缺陷删除管理这个地方为例子：

Function Defects_Attachment_CanDelete(Attachment)
  On Error Resume Next

  Defects_Attachment_CanDelete = Project_DefaultRes

‘添加只有在project角色里面才可以删除附件

IF User.IsInGroup("project") THEN
   Defects_Attachment_CanDelete = TRUE
  ELSE
   Defects_Attachment_CanDelete =FALSE
   MsgBox "The user " & User.UserName  & " doesn't  has permissions."
  END IF

  On Error GoTo 0
End Function

[ 本帖最后由 mengxb001 于 2006-7-6 15:24 编辑 ]

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)