Method: Add for Folders

Download PDF

Updated2024-09-12
1 minute(s) read

DIAdem 2021 Education
DIAdem 2021 Professional
DIAdem 2021 Advanced
+ 3

DIAdem adds a new folder object to the folders collection by creating a new folder.

Set oFolder = Object.Add(Name)

Object	Folders
Name	String Specifies the name of the new folder.
oFolder	Folder Returned object

The following example creates a new folder.

Copy script

Sub AddNewFolder(sPath, sFolderName)
  Dim fso, oMyFolder, oMySubFolders, oNewFolder
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set oMyFolder = fso.GetFolder(sPath)
  Set oMySubFolders = oMyFolder.SubFolders
  If sFolderName <> "" Then
    Set oNewFolder = oMySubFolders.Add(sFolderName)
  Else
    Set oNewFolder = oMySubFolders.Add("New Folder")
  End If
End Sub

DIAdem Help

Table of Contents

Method: Add for Folders

See Also

Log in to get a better experience