ZKteco не может подключиться к программному обеспечению - PullRequest
Новая
       103

ZKteco не может подключиться к программному обеспечению

0 голосов
/ 20 февраля 2020

У меня есть этот VB. net Код для подключения устройства biometri c к программному обеспечению 

Private Sub btnConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnConnect.Click
    Dim firmv As String = ""
    If txtIP.Text.Trim() = "" Or txtPort.Text.Trim() = "" Then
        MsgBox("IP and Port cannot be null", MsgBoxStyle.Exclamation, "Error")
        Return
    End If
    Dim idwErrorCode As Integer
    Cursor = Cursors.WaitCursor
    If btnConnect.Text = "Disconnect" Then
        axCZKEM1.Disconnect()
        bIsConnected = False
        btnConnect.Text = "Connect"
        lblState.Text = "Current State:Disconnected"
        txtIP.Enabled = True
        txtPort.Enabled = True
        cbPort.Enabled = True
        cbBaudRate.Enabled = True
        txtMachineSN.Enabled = True
        txtMachineSN2.Enabled = True
        btnRsConnect.Enabled = True
        btnUSBConnect.Enabled = True
        Cursor = Cursors.Default
        Return
    End If

    bIsConnected = axCZKEM1.Connect_Net(txtIP.Text.Trim(), Convert.ToInt32(txtPort.Text.Trim()))
    If bIsConnected = True Then
        btnConnect.Text = "Disconnect"
        btnConnect.Refresh()
        lblState.Text = "Current State:Connected"
        txtIP.Enabled = False
        txtPort.Enabled = False
        cbPort.Enabled = False
        cbBaudRate.Enabled = False
        txtMachineSN.Enabled = False
        txtMachineSN2.Enabled = False
        btnRsConnect.Enabled = False
        btnUSBConnect.Enabled = False
        iMachineNumber = 1
        axCZKEM1.RegEvent(iMachineNumber, 65535)
        Dim sFirmvers As String = ""
        Dim sDeviceName As String = ""
        Dim sSerialNumber As String = ""
        sta_GetDeviceInfo(sFirmvers, sDeviceName, sSerialNumber)
        txtFirmwareV.Text = sFirmvers
        txtDeviceName.Text = sDeviceName
        txtSN.Text = sSerialNumber

    Else
        axCZKEM1.GetLastError(idwErrorCode)
        MsgBox("Unable to connect the device,ErrorCode=" & idwErrorCode, MsgBoxStyle.Exclamation, "Error")
        Return
    End If
    Cursor = Cursors.Default
End Sub

Но это дает мне ошибку:

Невозможно подключиться устройство, ErrorCode = -307, что означает время ожидания подключения

Но я могу пропинговать устройство. Вот пример того, как я могу пропинговать устройство

Устройство, настроенное по Wi-Fi enter image description here

enter image description here

Модель устройства: WL20

Фирменное наименование: Zkteco

Тип подключения: Wi-Fi

...