时间:2020-10-07 14:26:38 | 栏目:VBS | 点击:次
如果指定的文件夹是根文件夹,返回 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