Kofax DM API Bedienungsanleitung PDF herunterladen (Seite 85)

DM API OBJECTS 65

PCDLookup

'Unsorted. This assures unsorted results, but

'it may not be required unless there were

'previous searches.

objPCDLookup.ClearOrderByProperties

End Select

'Set the maximum number of records search returns.

objPCDLookup.SetMaxRows 500

'Set the number of records to be returned at

'one time to user’s local cache.

objPCDLookup.SetChunkFactor 10

'Execute the lookup

objPCDLookup.Execute

If objPCDLookup.ErrNumber <> 0 Then

'Error: process it.

End If

'Get the information from the result set

Dim intColCount As Integer

Dim lngRowsFound As Long, lngMetaFound As Long

'Get the number of data rows found by the lookup.

lngRowsFound = objPCDLookup.GetRowsFound

MsgBox "The search returned " _

& CStr( lngRowsFound ) & " rows of data."

'Get the number of metadata rows lookup found.

lngMetaFound = objPCDLookup.GetMetaRowsFound

MsgBox "The search returned " _

& CStr( lngMetaFound ) & " rows of metadata."

'Get the number of columns in the result data set.

intColCount = objLookup.ColumnCount

MsgBox "The search result data set contains " _

& CStr( intColCount ) & " columns of data."

'Clear the result set list box (if needed).

1 2 ... 80 81 82 83 84 85 86 87 88 89 90 ... 527 528

Kommentare zu diesen Handbüchern

Keine Kommentare