Verbinden mit Avaya mit DevLink API

Question

Ich versuche eine Verbindung mit Avaya mit DevLink Beispielcode, der in VB geschrieben ist. Wenn DLOpen aufgerufen wird, wird erfolgreich eine Verbindung hergestellt, aber das Problem ist, dass wenn die DLRegisterType2CallDeltas() - Funktion aufgerufen wird, das Ergebnis eine Zahl größer als 2 ist, wie 432563542633 und es scheint, dass ein Problem in Verbindung mit der Ausgabe "Bhoo!! 432563542633 " ist. Ich lese DevLink Hilfe aber nur 3 Werte sind für das Ergebnis von DLRegisterType2CallDeltas() nur 0 für Erfolg und 1, 2 für Fehler erwähnt. Ich weiß wirklich nicht, was der Wert größer als 2 bedeutet. Irgendwelche Hilfe bitte? Der Code ist unten:

Public Sub StartMonitor(idPbx As Integer, PbxAddress As String, pbxPassword As String) 
     Dim PConn As Connection_Parameter.Connection_Status_Paramenter = New Connection_Parameter.Connection_Status_Paramenter 

     Try 
      PConn.IdPbx = idPbx 
      PConn.ErrorLevel = Connection_Enum.ErrorLevel.info 
      PConn.StatusMessage = "Connection in progress..." 
      PConn.Status = CommsEvent_Enum.CommsEvent_State.DEVLINK_COMMS_OPERATIONAL 

      RaiseEvent ConnectionStatus(Me, PConn) 
      Dim iRet As Long = DLOpen(New IntPtr(idPbx), PbxAddress, pbxPassword, Nothing, Nothing, oCommsEvent) 

      If iRet = 0 Then 
       PConn.StatusMessage = "IpOffice is present!!" 
       RaiseEvent ConnectionStatus(Me, PConn) 
      Else 
       PConn.StatusMessage = "IpOffice is present ?? " 
       RaiseEvent ConnectionStatus(Me, PConn) 
       'Exit Sub 
      End If 
      PConn.StatusMessage = "Wait connection response..." 
      RaiseEvent ConnectionStatus(Me, PConn) 
      Do 
       Thread.Sleep(100) 
       Application.DoEvents() 

      Loop While Not bIsConnect And Not bIsInterrupt 

      iRet = DLRegisterType2CallDeltas(New IntPtr(idPbx), oCallLogEvent) 

      If iRet > 0 Then 
       If iRet = 1 Then 
        PConn.ErrorLevel = Connection_Enum.ErrorLevel.warning 
        PConn.StatusMessage = "Error!! Check ip office IP Address or LAN Connection!!!" 
        RaiseEvent ConnectionStatus(Me, PConn) 
       End If 
       If iRet = 2 Then 
        PConn.ErrorLevel = Connection_Enum.ErrorLevel.warning 
        PConn.StatusMessage = "Error!! CTI License not found...!!!" 
        RaiseEvent ConnectionStatus(Me, PConn) 
       End If 

       If iRet > 2 Then 
        PConn.ErrorLevel = Connection_Enum.ErrorLevel.ignore 
        PConn.StatusMessage = "Bhoo!! " & iRet.ToString 
        RaiseEvent ConnectionStatus(Me, PConn) 
       End If 
       'Exit Sub 
      Else 
       PConn.StatusMessage = "DLRegisterType2CallDeltas is OK" 
       RaiseEvent ConnectionStatus(Me, PConn) 
      End If 

     Catch ex As Exception 
      Throw 
     Finally 
      PConn = Nothing 

     End Try 
    End Sub 

Answer 1

benötigen Sie CTI Pro Lizenz auf PBX Seite haben die DevLink zu verwenden, was Sie immer 2 als Ergebnis erhalten.