mengxb001 发表于 2006-7-6 15:14:47

自定义工作流控制附件权限

关于附件权限问题:

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

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'thas permissions."
END IF

On Error GoTo 0
End Function

[ 本帖最后由 mengxb001 于 2006-7-6 15:24 编辑 ]
页: [1]
查看完整版本: 自定义工作流控制附件权限