2016-04-11 14 views
0

Avaya'nın VB'de yazılan DevLink örnek koduna bağlanmaya çalışıyorum. DLOpen çağrıldığında başarılı bir şekilde bağlanır, ancak sorun şu ki, DLRegisterType2CallDeltas() işlevi çağrıldığında sonuç, 432563542633 gibi 2'den büyük bir sayıdır ve bağlantıda "Bhoo!! 432563542633 " bağlantısının olması gibi bir sorun var demektir. DevLink yardımını okudum ancak DLRegisterType2CallDeltas() 'ın başarı için sadece 0 ve hata için 1, 2 sonucu için sadece 3 değerden bahsedildi. 2'den büyük değerin ne anlama geldiğini gerçekten bilmiyorum. Herhangi bir yardım lütfen? kod aşağıda:DevLink API'sı ile Avaya'ya bağlanma

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 
+0

Cpp ile yazılmış başka bir kod çalıştırıyorum ve dönüş değeri her zaman 2'dir. Görünüşe göre lisans sorunları vardır. Hala üzerinde çalışıyorum. – Amir

cevap

0

başka her zaman sonuç olarak 2 alacak Devlink kullanmak PBX tarafında CTI yanlısı lisansı olması gerekir.

+0

Cevabınız için teşekkür ederiz. Evet, yukarıdaki yorumda söylediğim gibi lisans sorunu var – Amir