Remarks | Properties | Methods | Samples |
ED
|
avaliable
|
RT
|
not used
|
This collection contains the folder object for the specified folder. The folder item object allows different methods for different tpModulepaths. Not all methods are supported for all tpModulepaths
FileCount | FolderCount | Name |
AddItem | CreateFolder | DeleteFile |
DeleteFolder | FileItem | FolderItem |
Sub AddItem() Dim zFileManager As FileManager 'Object from type FileManager Dim zFileManagerFolder As FileManagerFolder 'Child object from type FileManager 'Fill the object Set zFileManager = MyWorkspace.ActiveDocument.FileManager 'Read the "help list" Set zFileManagerFolder = zFileManager.FolderItem(10) 'Add a new item into the list zFileManagerFolder.AddItem ("C:\Language_Tables\English.txt") Call CreateFolder End Sub Sub CreateFolder() Dim zFileManager As FileManager 'Object from type FileManager Dim zFileManagerFolder As FileManagerFolder 'Child object from type FileManager 'Fill the object Set zFileManager = MyWorkspace.ActiveDocument.FileManager 'Read the "help list" Set zFileManagerFolder = zFileManager.FolderItem(10) 'Create a new folder in the list zFileManagerFolder.CreateFolder ("My_Folder") Call FolderItem End Sub Sub FolderItem() Dim zFileManager As FileManager 'Object from type FileManager Dim zFileManagerFolder As FileManagerFolder 'Child object from type FileManager Dim zFileManagerItem As FileManagerFileItem 'Child object from type FileManagerFolder Dim zFolderItem As FileManagerFolder 'Child object from type FileManager 'Fill the object Set zFileManager = MyWorkspace.ActiveDocument.FileManager 'Read the "help list" Set zFileManagerFolder = zFileManager.FolderItem(10) 'Read a sub folder item Set zFolderItem = zFileManagerFolder.FolderItem(0) 'Add a file at the created sub-folder zFolderItem.AddItem ("C:\Programme\COPA-DATA\Help\editor.chm") End Sub