无法设置文件的写入权限

Question

我想创建一个文件并授予用户写入权限。

IO.File.Create(Path & "\test.json") 
Dim fs As Security.AccessControl.FileSecurity = IO.File.GetAccessControl(Path & "\test.json") 
Dim far As Security.AccessControl.FileSystemAccessRule = New Security.AccessControl.FileSystemAccessRule("DOMAIN\USER", Security.AccessControl.FileSystemRights.WriteData, Security.AccessControl.AccessControlType.Allow) 
fs.AddAccessRule(far) 

当我检查此文件的安全选项卡时，我看不到任何更改。 VS2015输出窗口不显示任何异常。 VS2015以管理员身份运行。

我用这个供参考：https://msdn.microsoft.com/en-us/library/d49cww7f(v=vs.110).aspx

Answer 1

所有你已经在你的代码改变是在内存中的文件的安全性。为了将这些更改应用到文件中，您必须致电SetAccessControl。

例如：

File.SetAccessControl(Path & "\test.json", fs)