找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 14893|回复: 1

[问题求助] [已解决]VBS怎么设置文件权限为everyone完全拒绝?

[复制链接]
发表于 2015-11-6 21:24:02 | 显示全部楼层 |阅读模式
本帖最后由 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

没看明白这个数字怎么来的
  1. Set oWMI = GetObject("Winmgmts:")
  2. set s = oWMI.ExecQuery("Select * from Win32_Directory where Name = 'c:\\111'")
  3. For Each i In s
  4. msgbox i.AccessMask  '18284713
  5. next
复制代码
这个可以读取文件夹的权限,设置完全拒绝,读取到18284713
应用到上面的demon的vbs却无效

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

 楼主| 发表于 2015-11-7 11:08:27 | 显示全部楼层
本帖最后由 czjt1234 于 2015-11-7 11:10 编辑

知道了

AceType = 1

这个
  1. Set oWMI = GetObject("winmgmts:\\.\root\CIMV2")
  2. Set s = oWMI.ExecQuery("SELECT * FROM Win32_LogicalFileSecuritySetting WHERE Path='C:\\1.txt'")
  3. For Each i in s
  4.     i.GetSecurityDescriptor Sec
  5. Next
  6. WScript.Echo Sec.GetObjectText_
复制代码
这个读取文件权限

虽然那个数字怎么相加的还没搞清楚
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 09:06 , Processed in 0.010747 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表