Kofax DM API - Manual (Page 417)

DM API T OKENS 397
%HAS_SUBFOLDERS
%HAS_SUBFOLDERS
This token is used if a folder has subfolders.
Syntax
PCDPropertyLists.GetPropertyValue( _
“%HAS_SUBFOLDERS”)
Parameters
Usage
If the current folder has subfolders of its own, the %HAS_SUBFOLDERS
token returns the value of “Y”.
Example
'Create a property list object.
Set PropLists = CreateObject("PCDClient.PCDPropertyLists")
'Set the DM security token.
PropLists.SetDST(strDST)
'Set the search type.
PropLists.SetObjectType("ContentsCollection")
'Execute the search.
PropLists.Execute()
'Initialize the row pointer.
PropLists.SetRow(0)
'Check results.
while ( PropLists.NextRow())
hasSubFolder = PropLists.GetPropertyValue("%HAS_SUBFOLDERS")
If( hasSubFolder ) Then
MsgBox( “This property list object has subfolders.”)
Else
MsgBox(“This property list object has no subfolders.”)
End If
PropLists.NextRow
%HAS_SUBFOLDERS The token that identifies whether or not
the current folder has subfolders within
it.