SSR_SetUnlockGroup

Definition

Usage

Set the open door combination.

Parameter

Device number

Combination number. The value ranges from 1 to 10, that is, the device supports a maximum of 10 open door combinations.

Number of the group in the open door combination. Each open door combination contains five group numbers. Each group number ranges from 1 to 99. For example, SSR_SetUnLockGroup (1, 1, 2, 23, 14, 0, 56) means that the open is opened only when members of groups 2, 23, 14, and 56 pass verification.

Return Value

Return True if it is successful, or return False.

Related Function

SSR_GetUnLockGroup

 

Ejemplo

C#

//Create Standalone SDK class dynamicly.
zkemkeeper.CZKEMClass axCZKEM1 = new zkemkeeper.CZKEMClass();
int iMachineNumber = 1;
axCZKEM1.Connect_Net("10.0.0.43", 4370);

int idwErrorCode = 0;

int iComNo = 1;
int iGroup1 =12;
int iGroup2 =23;
int iGroup3 = 34;
int iGroup4 = 45;
int iGroup5 = 13;

if (axCZKEM1.SSR_SetUnLockGroup(iMachineNumber, iComNo, iGroup1, iGroup2, iGroup3, iGroup4, iGroup5))
{
    axCZKEM1.RefreshData(iMachineNumber);//the data in the device should be refreshed
    MessageBox.Show("SetUnlockGroups, Groups:" + iGroup1.ToString() + ":" + iGroup2.ToString() + ":" + iGroup3.ToString() + ":" + iGroup4.ToString() + ":" + iGroup5.ToString(), "Success");
}
else
{
    axCZKEM1.GetLastError(ref idwErrorCode);
    MessageBox.Show("Operation failed,ErrorCode=" + idwErrorCode.ToString(), "Error");
}

VB

'Create Standalone SDK class dynamicly.
Dim axCZKEM1 As New zkemkeeper.CZKEM
Dim iMachineNumber As Integer

axCZKEM1.Connect_Net("10.0.0.43", 4370)

Dim idwErrorCode As Integer

Dim iComNo As Integer = 1
Dim iGroup1 As Integer = 12
Dim iGroup2 As Integer = 23
Dim iGroup3 As Integer = 34
Dim iGroup4 As Integer = 45
Dim iGroup5 As Integer = 13

If axCZKEM1.SSR_SetUnLockGroup(iMachineNumber, iComNo, iGroup1, iGroup2, iGroup3, iGroup4, iGroup5) = True Then
    MsgBox("SetUnlockGroups, Groups:" + iGroup1.ToString() + ":" + iGroup2.ToString() + ":" + iGroup3.ToString() + ":" + iGroup4.ToString() + ":" + iGroup5.ToString(), MsgBoxStyle.Information, "Success")
Else
    axCZKEM1.GetLastError(idwErrorCode)
    MsgBox("Operation failed,ErrorCode=" & idwErrorCode.ToString(), MsgBoxStyle.Exclamation, "Error")
End If