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