Kofax DM API - Manual (Page 91)

DM API O BJECTS 71
PCDNetworkInfo
Public oNWInfo As New PCDNetworkInfo
Private Sub cbCancel_Click()
Unload DomainForm
End Sub
Private Sub Form_Load()
Dim nResult As Long
Dim nNumRows As Long
'Load the Domain List.
' %NI_NT indicates this is an NT based OS.
' %UNDEFINED returns all domains from the root.
nResult = oNWInfo. GetDomainList ("%NI_NT", _
"%UNDEFINED")
nNumRows = 0
'If the Domain list has been retrieved,
'get the number of domains in the list.
If nResult = 0 Then