主题：[求助]文件权限

msgbox(e.FileName)

If e.FileName.Length < 4+user.Group.length Then

    e.cancel = true

ElseIf Left(e.FileName,4+user.group.length) <> "/公共/" & user.group Then

    e.cancel = true

End If

If e.Cancel Then
    MessageBox.Show("禁止删除" & user.group & "目录下的内容", "提示", MessageBoxButtons.OK,MessageBoxIcon.Information)
End If