Kofax DM API Manual de usuario Pagina 120

  • Descarga
  • Añadir a mis manuales
  • Imprimir
  • Pagina
    / 528
  • Tabla de contenidos
  • MARCADORES
  • Valorado. / 5. Basado en revisión del cliente
Vista de pagina 119
100 CHAPTER 3
PCDPutDoc
Else
TotalFileSize = TotalBytesWritten
End If
Get #1, , bdata
objPutStream.Write bdata, TotalBytesWritten
Debug.Print TotalBytesWritten, _
objPutStream.BytesWritten, _
objPutStream.ErrNumber, _
objPutStream.ErrDescription
TotalBytesWritten = TotalFileSize - _
TotalBytesWritten
End If
Wend
objPutStream.SetComplete
Close #1
Set objPutSteam = Nothing
Set objDoc = Nothing
Set objDoc = New PCDDocObject
objDoc.SetDST DST
objDoc.SetObjectType “DEF_PROF”
objDoc.SetProperty "%TARGET_LIBRARY", Library
objDoc.SetProperty "%OBJECT_IDENTIFIER", _
DocNumber
objDoc.SetProperty "%VERSION_ID", VersionID
objDoc.SetProperty "%STATUS", "%UNLOCK"
objDoc.Update
If objDoc.ErrNumber <> 0 Then
Debug.Print objDoc.ErrNumber, _
objDoc.ErrDescription
End If
Set objPutDoc = Nothing
Set objDoc = Nothing
Debug.Print "Upload completed!"
End Sub
Vista de pagina 119
1 2 ... 115 116 117 118 119 120 121 122 123 124 125 ... 527 528

Comentarios a estos manuales

Sin comentarios