FileManager.FolderItem



FolderItem(lModule As tpModulePaths) As FileManagerFolder

Parameters

lModule As tpModulePaths
A constant which defines the specific folder.
ED
avaliable
RT
not used

Remarks

This method returns the folder object for the specified folder.

Sample:


Sub FolderItem()

Dim zFileManager As FileManager 'Object from type FileManager
Dim zFileManagerFolder As FileManagerFolder 'Object from type FileManagerFolder

'Fill the object
Set zFileManager = MyWorkspace.ActiveDocument.FileManager

'Read the "language list"
Set zFileManagerFolder = zFileManager.FolderItem(9)
'Add a new item into the list
zFileManagerFolder.AddItem ("C:\Language_Tables\English.txt")

'Read the "graphics list"
Set zFileManagerFolder = zFileManager.FolderItem(2)
'Add a new item into the list
zFileManagerFolder.AddItem ("C:\Graphics\zenOn_Logo.jpg")

'Read the "help list"
Set zFileManagerFolder = zFileManager.FolderItem(10)
'Add a new item into the list
zFileManagerFolder.AddItem ("C:\Help\help.chm")

'Read the "multimedia list"
Set zFileManagerFolder = zFileManager.FolderItem(5)
'Add a new item into the list
zFileManagerFolder.AddItem ("C:\Media\intro.wav")

'Read the "lists list"
Set zFileManagerFolder = zFileManager.FolderItem(4)
'Add a new item into the list
zFileManagerFolder.AddItem ("C:\Lists\List.doc")

'Read the "drivers list"
Set zFileManagerFolder = zFileManager.FolderItem(15)
'Add a new item into the list
zFileManagerFolder.AddItem ("C:\Drivers\driver.exe")

'Read the "others list"
Set zFileManagerFolder = zFileManager.FolderItem(17)
'Add a new item into the list
zFileManagerFolder.AddItem ("C:\Others\infos.pdf")

End Sub


tpModulePaths constants:

ModulePaths Constant
tpPathAdditional 17
tpPathAlloc 3
tpPathBackup 7
tpPathBMP 2
tpPathDrivers 15
tpPathExpArchives 8
tpPathExport 1
tpPathGraphic 0
tpPathHelp 10
tpPathLanguage 9
tpPathList 4
tpPathMedia 5
tpPathPCE 12
tpPathPictures 11
tpPathReport 6
tpPathSystem 13
tpPathVideos 14

See Also

FileManager, FileManagerFolder