获取所有权并为VB.net中的每个人设置访问权限

Question

所以，我的问题如下：我正在尝试使用VB代码替换批处理文件（Takeown.gib（gib，因为VS让我更容易用https://github.com/PFCKrutonium/Windows-10-Login-Background-Changer）提取它）。基本上我需要获取目录和所有包含文件的所有权，以及设置权限，以便每个人或管理员都可以编辑目录和包含文件。

此时我正在查看的代码是：

    Dim User As String = System.Security.Principal.WindowsIdentity.GetCurrent.Name
    Dim FolderInfo As IO.DirectoryInfo = New IO.DirectoryInfo(SysResources)
    Dim FolderAcl As New DirectorySecurity
    FolderAcl.AddAccessRule(New FileSystemAccessRule(User, FileSystemRights.FullControl, AccessControlType.Allow, PropagationFlags.InheritOnly, AccessControlType.Allow))
    FolderInfo.SetAccessControl(FolderAcl)

这似乎并不特别有效，因为它只完成了一半的工作，而且事实上它甚至无法做到这一点。

感谢您给予我任何见解/帮助！

Answer 1

参见Knuckle-Dragger评论 - 通过继续使用批处理解决它，并修复批处理。