Kofax DM API Instrukcja Użytkownika Pobierz pdf (Strona 90)

70 CHAPTER 3

PCDNetworkInfo

Public sDST As String

Private Sub cbDomain_Click()

DomainForm.oNWInfo.SetDST (sDST)

DomainForm.Show

End Sub

Private Sub cbGroupInfo_Click()

GroupForm.sDST = sDST

GroupForm.oGroupInfo.SetDST (sDST)

GroupForm.Show

End Sub

Private Sub cbQuit_Click()

Unload NetInfoBaseForm

End Sub

Private Sub Form_Load()

'Local Variable declarations.

Dim oLogin As New PCDLogin

Dim nResult As Long

Dim sTempBuf As String

'Login process.

nResult = oLogin.AddLogin(0, "MyLibrary", "", "")

nResult = oLogin.AddLogin(0, "MyDomain", _

"MyUserID", "MyPassword")

nResult = oLogin.Execute()

sDST = oLogin.GetDST()

'Get And display the DST.

txtDST.Text = sDST

End Sub

1 2 ... 85 86 87 88 89 90 91 92 93 94 95 ... 527 528

Komentarze do niniejszej Instrukcji

Brak uwag