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

76 CHAPTER 3

PCDNetworkInfo

If nResult = 0 Then

nNumRows = oGroupInfo.GetRowCount()

End If

If nNumRows = 0 Then

MsgBox "You do not have access to “ _

& “Domain information at this time."

Else

'Fill ListBox with Domain information.

For i = 1 To nNumRows

nResult = oGroupInfo.NextRow()

lstDomains.AddItem (oGroupInfo.GetValue())

Next i

'Initialize Domain list to first element.

lstDomains.ListIndex = 0

'This Form data member holds currently

'selected Domain information.

sDomainName = lstDomains.Text

nResult = oGroupInfo.GetGroupList( _

"%NI_NT", sDomainName)

If nResult = 0 Then

nNumRows = oGroupInfo.GetRowCount()

End If

'If no rows are returned then place that

'information in the ListBox. Otherwise, place

'the list of all groups in the ListBox.

If nNumRows = 0 Then

lstGroups.AddItem "NO GROUPS FOR THIS DOMAIN"

Else

For i = 1 To nNumRows

nResult = oGroupInfo.NextRow()

lstDomains.AddItem (oGroupInfo.GetValue())

Next i

1 2 ... 91 92 93 94 95 96 97 98 99 100 101 ... 527 528

Comentários a estes Manuais

Sem comentários