Kofax DM API Manual do Utilizador descarregar pdf (Página 191)

DM API METHODS AND PROPERTIES 171

FetchTrustees

Set objDOC = CreateObject( _

"PCDClient.PCDDocObject")

'Create the property list object.

Dim objPropList As New PCDPropertyList

'Set the library.

objDOC.SetProperty "%TARGET_LIBRARY", strLib

'Set the DST.

objDOC.SetDST strDST

'Set the Form.

objDOC.SetObjectType "DEF_PROF"

'Identify the document object whose trustee

'properties are to be updated.

objDOC.SetProperty "%OBJECT_IDENTIFIER", _

txtDocNum.Text

'Create variables to store security data.

Dim LDefaultRights As Long

Dim LEffectiveRights As Long

Dim LAccessControl As Long

'Get the document.

objDOC.Fetch

'Check for any errors.

If objDOC.ErrNumber <> 0 Then

lstResultSet.AddItem "Unable to fetch doc: " _

& txtDocNum.Text

GoTo bye

End If

'Retrieve properties from the fetched document.

Set objPropList = objDOC.GetReturnProperties

'Store the results.

1 2 ... 186 187 188 189 190 191 192 193 194 195 196 ... 527 528

Comentários a estes Manuais

Sem comentários