[abuzzouz]

أخواني

توصلت إلى الحل لتحديد صلاحية عدم تمكين مستخدم معين من حذف مجلد معين أو تغيير اسمه وإليكم الكود:

كود :

Dim UserAccount As String = "Everyone"
        Dim FolderInfo As IO.DirectoryInfo = New IO.DirectoryInfo("C:\My Folder")
        Dim FolderAcl As New DirectorySecurity
        FolderAcl.AddAccessRule(New FileSystemAccessRule(UserAccount, FileSystemRights.Delete, InheritanceFlags.None, PropagationFlags.InheritOnly, AccessControlType.Deny))
        FolderInfo.SetAccessControl(FolderAcl)

وبالتوفيق للجميع