GetRemoteCabinetListEx
Gets Remote Cabinet List.
Public Function GetRemoteCabinetListEx(ServerAddress As String,
lPortNo As Long,
CabinetCount As Long,
CabinetList() As Byte) As Long
Parameters
|
In/out |
Name |
Data type |
Description |
|
In |
lPortNo |
Long |
Port Index. |
|
In |
ServerAddress |
String |
Server Address. |
|
Out |
CabinetCount |
Long |
CabinetCount. |
|
Out |
CabinetList() |
Byte |
Cabinet List |
Description
This function is called from OmniDocs Desktop and Omnidocs Admin. It is used to get the list of cabinets on a particular IP address and PortNumber.
Return value
|
Name |
Description |
|
NG_SUCCESS |
In case of success |
|
-9 |
No Cabinet. |
|
-4 |
Cabinet Properties not Valid. |
Example
Dim PortId As Long
Dim ServerAddress As String
Dim lCabinetCount As Long
Dim bCabinetList As Byte
Dim lRetVal As long
PortId =3333
ServerAddress =”192.168.5.53”
lRetVal = gPanDb. GetRemoteCabinetListEx(ServerAddressPortNo, lCabinetCount, bCabinetList)
If lRetVal <> NG_SUCCESS Then
MsgBox gPandDb.ErrDescription, vbInformation
Screen.MousePointer = vbNormal
Exit Sub
Else
MsgBox “Success”
End if