我想声明一个常量，值为指向不同路径的文件或文件夹并赋予TA们相同权限和属性
我想声明一个常量，常量值为指向不同路径的文件或文件夹并赋予TA们相同权限和属性其实，就是想做一些文件或者文夹的假体，即0字节文件，然后，赋予+RSH权限，并且，EVERYONE只读或者拒绝也行。
例如：
Dim $FilesPath = "a" 这里的A我想代表路径：c:\test和d:\a.dll和E:\good.mp3等等这样的多个路径
当$FilesPath值里所示的路径文件存在里，去除其所有属性，赋予everyone完全权权限，然后，删除它们，接着
给这些所有文件和文件夹+RSH属性并且赋予他们everyone只读权限或者完全拒绝权限
我尝试过，可没成功，各位老师，精炼点儿的代码要如何写？请指教！感激不尽！ 本帖最后由 凌菡 于 2014-1-31 22:41 编辑
local $FilesPath = ["C:\c.txt", "D:\d.mp3", "E:\here3"]
For $i = 0 To UBound($FilesPath) - 1
If FileExists($FilesPath[$i]) Then
MsgBox(4096, $FilesPath[$i], "Exists")
FileSetAttrib($FilesPath,"-RSH")
RunWait(@ComSpec & ' /c ' & 'echo y|cacls.exe ' & $FilesPath[$i] & '/P everyone:F','',@SW_HIDE)
DirRemove($FilesPath)
Else
MsgBox(4096, $FilesPath[$i], "Does NOT exists")
DirCreate($FilesPath)
FileSetAttrib($FilesPath, "+RSH",1)
RunWait(@ComSpec & ' /c ' & 'echo y|cacls.exe ' & $FilesPath[$i] & ' /P everyone:R','',@SW_HIDE)
EndIf
Next
我是想建立一个删除不掉的文件，貌似这样写，更接近要求了，可是，还是能删除掉的啊？接着要怎么写？
页:
[1]