VB6中如何获取、添加、删除、修改NTFS的权限？

[流水之风]

我现在已经可以控制一部分了，例如可以添加权限和修改权限，但是关于获取NTFS的权限和删除权限我还不知道该怎么做，另外还有NTFS权限添加、修改时继承的问题，如何继承上级的权限和让下级继承权限？希望能给个源码，只需要做成函数形式，然后把函数的参数注明就可以了，不用弄组件来选择要设置什么权限了

例如：
添加权限（目标路径，帐号名称，权限）

并注明权限可用的值及所代表的作用就可以了，权限应该包含完全控制、遍历文件夹/运行文件、列出文件夹/读取数据、读取属性、读取扩展属性、创建文件/写入数据、创建文件夹/附加数据、写入属性、写入扩展属性、删除子文件夹及文件、删除、读取权限、更改权限、取得所有权这些，并希望能够有一些注释，以便学习，谢谢！

[toury]

Shell "cacls.exe " & sPath & " /T /C /E /G

sPath :你要控制的文件夹/文件的路径

[toury]

sPath :你要控制的文件夹/文件的路径
uName :用户名，如"user"
T、C、E、G:权限类别。具体你GOOGLE一下吧

Shell "cacls.exe " & sPath & " /T /C /E /G " & uName

[流水之风]

忘了说了，在设置权限时还应该可以设置是“只有该文件夹”、“该文件夹，子文件夹及文件”、“该文件夹及子文件夹”、“该文件夹及文件”、“只有子文件夹及文件”、“只有子文件夹”、“只有文件”，以及“将这些权限只应用到这个容器中的对象和/或容器上”这些功能，因为要求太多，所以100分可能太少，如果能够解决，我可以开新帖给足1000分，希望各位能够帮帮忙！谢谢！

[流水之风]

另外楼上的朋友所说的使用CACLS是不能完成我的要求的，如果可以，我就不需要来这里发帖了，而且条用CACLS和使用API明显效果不同，CACLS也不能单独设置完全控制、遍历文件夹/运行文件、列出文件夹/读取数据、读取属性、读取扩展属性、创建文件/写入数据、创建文件夹/附加数据、写入属性、写入扩展属性、删除子文件夹及文件、删除、读取权限、更改权限、取得所有权这些权限，它只能设置几个组合型的权限，所以对我来说意义不大。

[流水之风]

本帖将设置为无满意结贴，请转移到我另外一个帖子中回复，谢谢
http://topic.csdn.net/u/20090919/09/d44e3179-f09c-4b43-8db4-c518de619acb.html