windows - 使用 vb.net 的 Windows 文件/文件夹权限

Question

我可以使用给定的代码设置文件/文件夹限制。

Imports System.Security.AccessControl

Dim FolderPath As String = "C:\TestingFolder" 'Specify the folder here
Dim UserAccount As String = "MYDOMAIN\someuser" 'Specify the user here

Dim FolderInfo As IO.DirectoryInfo = New IO.DirectoryInfo(FolderPath)
Dim FolderAcl As New DirectorySecurity
FolderAcl.AddAccessRule(New FileSystemAccessRule(UserAccount, FileSystemRights.Modify, InheritanceFlags.ContainerInherit Or InheritanceFlags.ObjectInherit, PropagationFlags.None, AccessControlType.Allow))
FolderAcl.SetAccessRuleProtection(True, False) 'uncomment to remove existing permissions
FolderInfo.SetAccessControl(FolderAcl)

我的目标是使用代码设置权限，只有我的应用程序才能更改对文件/文件夹的读/写访问权限。除了我的 vb.net 程序，没有人可以更改权限。我的目标是编写一个安全应用程序，它将要求密码访问程序，并且程序将能够授予用户访问权限（读/写/修改）。