批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]VBS怎么设置文件权限为everyone完全拒绝？ [打印本页]

作者: czjt1234 时间: 2015-11-6 21:24 标题: [已解决]VBS怎么设置文件权限为everyone完全拒绝？

本帖最后由 czjt1234 于 2015-11-7 11:08 编辑

不能用cacls
http://demon.tw/copy-paste/vbs-ntfs-permission.html
这儿只有设置只读，完全控制，读写

https://msdn.microsoft.com/en-us/library/aa394063(v=vs.85).aspx
Win32_ACE class

没看明白这个数字怎么来的

Set oWMI = GetObject("Winmgmts:")
set s = oWMI.ExecQuery("Select * from Win32_Directory where Name = 'c:\\111'")
For Each i In s
msgbox i.AccessMask  '18284713
next
复制代码

这个可以读取文件夹的权限，设置完全拒绝，读取到18284713
应用到上面的demon的vbs却无效

作者: czjt1234 时间: 2015-11-7 11:08

本帖最后由 czjt1234 于 2015-11-7 11:10 编辑

知道了

AceType = 1

这个

Set oWMI = GetObject("winmgmts:\\.\root\CIMV2") 
Set s = oWMI.ExecQuery("SELECT * FROM Win32_LogicalFileSecuritySetting WHERE Path='C:\\1.txt'") 
For Each i in s 
    i.GetSecurityDescriptor Sec
Next
WScript.Echo Sec.GetObjectText_
复制代码

这个读取文件权限

虽然那个数字怎么相加的还没搞清楚

欢迎光临批处理之家 (http://bathome.net./)