某指定文件夹security选项卡下有一个users用户组,把这个组的modify打上勾,用vbs实现,急用,谢谢
------解决方案--------------------
...修改文件属性的VBS程序,呵呵...有意思
------解决方案--------------------
- VBScript code
strFolder = "C:FONT" Set objFolder = GetObject("winmgmts:Win32_LogicalFileSecuritySetting.path=""" & strFolder & """") re = objFolder.GetSecurityDescriptor(objSD) For each wmiAce in objSD.DACL Set Trustee = wmiAce.Trustee If Trustee.Name = "Users" Then wmiAce.AccessMask =1769919 End If Next objFolder.SetSecurityDescriptor(objSD)
------解决方案--------------------
一行代码可以搞定。主要是权限问题,种种原因代码不写了,呵呵
------解决方案--------------------
这是干啥啊,看回复好像很微妙啊。。。不会,帮顶,撒点分给我吧。
------解决方案--------------------
帮顶~!