Kofax DM API Manuel d'utilisateur télécharger pdf (Page 129)

DM API OBJECTS 109

PCDSQL

'This will be shared throughout this form.

Public oDIC As New DocInternalClass

Private Sub cbNextKey_Click()

NextKeyForm.oNextKey.SetDST( oDIC.GetDST() )

NextKeyForm.Show

End Sub

Private Sub cbNoDST_Click()

DSTForm.Show

End Sub

Private Sub cbQuit_Click()

Dim oForm As Form

For Each oForm In Forms

Unload oForm

Next oForm

End Sub

Private Sub cbSelectTest_Click()

'Pass the DST from the Base form to

'the SelectForm's PCDSQL object.

SelectForm.oSelectSQL.SetDST( oDIC.GetDST() )

SelectForm.Show

End Sub

Private Sub cbUpdateTest_Click()

'This allows the DST has to make it from

'one form to another.

UpdateForm.oUpdateSQL.SetDST( oDIC.GetDST() )

'Call the other form.

UpdateForm.Show

End Sub

'This is the base form for this application.

Private Sub Form_Load()

'Local Variable declarations

1 2 ... 124 125 126 127 128 129 130 131 132 133 134 ... 527 528

Commentaires sur ces manuels

Pas de commentaire