VBScript Reference Manual for InduSoft Web Studio

InduSoft Web Studio VBScript Reference Manual
Property: IsRootFolder
Description: Tests to see if the specified folder is the root folder.
Use: boolValue = objFolder.IsRootFolder
Arguments: objFolder
Required. The name of a Folder Object previously instantiated.
Return: True if the specified folder is the root folder; False if not.
Remarks: Includes files with hidden and system file attributes set.
Example: Dim fso, f, n, s, myFolder
Set fso = CreateObject(“Scripting.FileSystemObject”) ‘Instantiate the FSO object
myFolder = $getAppPath() ‘Specify the app directory
Set f = fso.GetFolder (myFolder)
n = 0
If f.IsRootfolder Then
MsgBox “The app folder is the root folder”
Else
s = myFolder & vbCrLf
Do Until f.IsRootFolder
Set f = f.ParentFolder
n = n+1
s = s & “parent folder is “ & f.Name & vbCrLf
Loop
MsgBox “Folder was nested “ & n & “ levels” & vbCrLf & s
End If
Property: Name
Description: Sets or returns the name of a specified folder
Use: objFolder.Name = newName
strName = objFolder.Name
Arguments: objFolder
Required. The name of a Folder Object previously instantiated.
newName
Optional. If provided, newName is the new name of the specified folder object
Return: The name of the specified folder.
Remarks: Read/write.
Example: Dim fso, f, myFolder
Set fso = CreateObject(“Scripting.FileSystemObject”) ‘Instantiate the FSO object
myFolder = $getAppPath() ‘Specify the app directory
Set f = fso.GetFolder (myFolder)
MsgBox “folder name is “ & f.Name ‘Returns the folder name
InduSoft, Ltd. 241