Cisco Cisco Computer Telephony Integration Option 8.5 개발자 가이드

다운로드
페이지 668
 
5-29
CTI OS Developer’s Guide for Cisco ICM/IPCC Enterprise & Hosted Editions Release 7.1(1)
 
Chapter 5      CTI OS ActiveX Controls
The Silent Monitor StandAlone ActiveX Control
       MsgBox "Connect returned error " + Str(nRetVal)
    End If
End Sub
Private Sub btnDisconnect_Click()
    Dim nRetVal As Long
    SilentMonitorCtl.Disconnect
End Sub
Private Sub btnStartMonitoring_Click()
     m_Args.clear
     m_Args.AddItem “AgentId”, “1000”
     m_Args.AddItem “PeripheralID”, “5004”
    Dim nRetVal As Long
    SilentMonitorCtl.StartMonitoring m_Args, nRetVal
    If nRetVal <> CIL_OK Then
        MsgBox "StartMonitoring returned error " + Str(nRetVal)
    End If
End Sub
Private Sub btnStopMonitoring_Click()
     m_Args.clear
     m_Args.AddItem “AgentId”, “1000”
     m_Args.AddItem “PeripheralID”, “5004”
    
    Dim nRetVal As Long
    SilentMonitorCtl.StopMonitoring m_Args, nRetVal
    If nRetVal <> CIL_OK Then
        MsgBox  "StopMonitoring returned error " + Str(nRetVal)
    End If
End Sub
Private Sub SilentMonitorCtl_OnSessionDisconnected(ByVal pIArguments 
As SILENTMONITORCTLLib.IArguments)
    MsgBox "SilentMonitorSession Disconnected Event"
End Sub