VBS教程:属性-IsRootFolder 属性
时间:2020-10-07 14:26:38|栏目:VBS|点击: 次
IsRootFolder 属性
如果指定的文件夹是根文件夹,返回 True;否则返回 False。
object.IsRootFolder
object 应为 Folder 对象的名称。
说明
以下代码举例说明如何使用 IsRootFolder 属性:
Function DisplayLevelDepth(pathspec)Dim fso, f, n Set fso = CreateObject("Scripting.FileSystemObject")Set f = fso.GetFolder(pathspec) If f.IsRootFolder Then DisplayLevelDepth ="
指定的文件夹是根文件夹。"
Else
Do Until f.IsRootFolder
Set f = f.ParentFolder
n = n + 1
Loop
DisplayLevelDepth ="
指定的文件夹是嵌套级为" & n & "
的文件夹。"
End If
End Function