Объект Device
Обьект Device позволяет работать с устройством, доступным приложению Call Office. Список доступных устройств можно получить используя метод DeviceList. Перед тем как начать работу с устройством следует его открыть используя метод Open. Соответственно завершать работу с устройством следует методом Close. С открытым устройством можно выполнять различные действия, набор номера, ожидание входящего звонка, произнесение сообщения и т.д. вызывая соответствующие методы. Ряд методов устройства выполняются в отдельном потоке, что позволяет исключить зависание приложения на время работы метода. В процессе работы объект генерирует различные события подписаться на которые можно используя событие OnProcess. Устройство позволяет формировать журнал своей работы. Управляется журнал свойством LogFile. Некоторые функции объекта Device работают в асинхронном режиме.
OnProcessПримеры
- Пример на JavaScript
/* Пример передачи сообщения по указанному номеру телефона */
var Device = new ActiveXObject ("CallOffice.Device"); // Создаем обьект устройство
Device.Open (); // Открываем устройство
var Result = Device.Dial ("8906123456", 40); // Набираем номер и ожидаем когда абонент снимет трубку
if (Result == 1) { // Если абонент поднял трубку
Device.Say ("Сообщение"); // Произносим звуковой файл с именем Сообщение
}
Device.HangUp (); // Кладем трубку
Device.Close (); // Закрываем устройство
/* Пример ожидания входящего звонка и передачи сообщения абоненту */
var Device = new ActiveXObject ("CallOffice.Device"); // Создаем обьект устройство
Device.Open (); // Открываем устройство
var Result = Device.WaitForCall (120); // Ожидаем входящий звонок 120 cекунд
if (Result == 0) { // Если входящий звонок поступил
Device.Say ("Сообщение"); // Произносим звуковой файл с именем Сообщение
}
Device.HangUp (); // Кладем трубку
Device.Close (); // Закрываем устройство
- Пример на VBScript
' Пример передачи сообщения по указанному номеру телефона
Dim Device
Set Device = CreateObject ("CallOffice.Device") ' Создаем обьект устройство
Device.Open ' Открываем устройство
Result = Device.Dial ("8906123456", 40) ' Набираем номер и ожидаем когда абонент снимет трубку
if Result = 1 then ' Если абонент поднял трубку
Device.Say "Сообщение" ' Произносим звуковой файл с именем Сообщение
end if
Device.HangUp ' Кладем трубку
Device.Close ' Закрываем устройство
' Пример ожидания входящего звонка и передачи сообщения абоненту
Dim Device
Set Device = CreateObject ("CallOffice.Device") ' Создаем обьект устройство
Device.Open ' Открываем устройство
Result = Device.WaitForCall (120) ' Ожидаем входящий звонок 120 cекунд
if Result = 1 then ' Если входящий звонок поступил
Device.Say "Сообщение" ' Произносим звуковой файл с именем Сообщение
end if
Device.HangUp ' Кладем трубку
Device.Close ' Закрываем устройство