A possible solution could be the following: Create a new formula, rename it to [b]IsFolder[/b] and paste the following text into the formula editor:
[code]
arguments strFolder
dim Err
try
$strFolder : “.FLD”$.Name
catch Err
return FALSE
End
return TRUE
[/code]
Then you could call this helper formula like this:
[code]
If IsFolder(“Folder”) Then …
If IsFolder(“AFolderAnotherFolder”) Then …
[/code]
The formula [b]IsFolder[/b] tries to convert the object name into a reference to the object. If the object exists this is possible and accessing the [b]Name[/b] property of the folder is a valid operation. Otherwise an error will occur which will be catched by the [b]catch[/b] statement. The variable [b]Err[/b] contains the error message as a string, but we do not need it here.
Support
support@weisang.com
