Previous PageNext Page

8.11.10 IsRootFolder Property

Returns True if the specified folder is the root folder; False if it is not.
 

Syntax

object.IsRootFolder

Arguments

object
A Folder object.

Remarks

The following code illustrates the use of the IsRootFolder property:
 

Dim fs

Set fs = CreateObject("Scripting.FileSystemObject")

Sub DisplayLevelDepth(pathspec)

Dim f, n

Set f = fs.GetFolder(pathspec)

If f.IsRootFolder Then

MsgBox "The specified folder is the root folder."

Else

Do Until f.IsRootFolder

Set f = f.ParentFolder

n = n + 1

Loop

MsgBox "The specified folder is nested " & n & " levels deep."

End If

End Sub


Copyright © 2000 Chili!Soft

Previous PageTop Of PageNext Page