Framework EDI Reference. Methods and Properties
ediFileSystem. GetDirRecursive

Gets a list of all underlying files and folders in a specified path.

Syntax:

• Set <oFileList> = ediFileSystem.GetDirRecursive(<sPath>)

Parameters:

• sPath – A valid directory or path and file name.  Wild cards are not allowed.

Returns:

Object of type FREDI.ediFiles if the call is successful; Empty if the call fails.

Example

Dim oEdiDoc As Fredi.ediDocument
Dim oFileSystem As Fredi.ediFileSystem
Dim oFiles As Fredi.ediFiles
Dim oFile As Fredi.ediFile
Dim sFilesList As String

' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument

' Get file system object.
Set oFileSystem = oEdiDoc.GetFileSystem

' Get the files in the folder.
Set oFiles = oFileSystem.GetDirRecursive(App.Path & "\SomeFolder\")

sFilesList = vbCrLf

For Each oFile In oFiles

sFilesList = sFilesList & oFile.FullPathName & vbCrLf

Next

MsgBox sFilesList

Samples

• M_GetDirRecursive.zip