Объект Device примеры использования

Обьект Device позволяет работать с устройством, доступным приложению Call Office. Список доступных устройств можно получить используя метод DeviceList. Перед тем как начать работу с устройством следует его открыть используя метод Open. Соответственно завершать работу с устройством следует методом Close. С открытым устройством можно выполнять различные действия, набор номера, ожидание входящего звонка, произнесение сообщения и т.д. вызывая соответствующие методы. Ряд методов устройства выполняются в отдельном потоке, что позволяет исключить зависание приложения на время работы метода. В процессе работы объект генерирует различные события подписаться на которые можно используя событие OnProcess. Устройство позволяет формировать журнал своей работы. Управляется журнал свойством LogFile. Некоторые функции объекта Device работают в асинхронном режиме.

Методы
Метод Device::About	Метод Device::LogOff	Метод Device::StartDetectDTMF
Метод Device::Answer	Метод Device::LogOn	Метод Device::StopAudioRecord
Метод Device::Cancel	Метод Device::Open	Метод Device::StopDetectDTMF
Метод Device::ClearSignals	Метод Device::Quit	Метод Device::StopSpeechRecognition
Метод Device::Close	Метод Device::Say	Метод Device::Talk
Метод Device::DeleteSMS	Метод Device::SayText	Метод Device::TextToSound
Метод Device::Dial	Метод Device::SelectFolder	Метод Device::TransferCall
Метод Device::GetBalance	Метод Device::SelectSound	Метод Device::WaitForAnswer
Метод Device::ClearSignals	Метод Device::SendCommand	Метод Device::WaitForCall
Метод Device::HangUp	Метод Device::SendDTMF	Метод Device::WaitForIncoming
Метод Device::InLog	Метод Device::SendSMS	Метод Device::WaitForSMS
Метод Device::InitSpeechRecognition	Метод Device::StartAudioRecord	Метод Device::SetCallerId
Метод Device::Listen	Метод Device::StartSpeechRecognition	Метод Device::Result
Устаревшие методы
Метод Device::GetDeviceCount	Метод Device::GetDeviceIdByIndex	Метод Device::GetDeviceNameByIndex
Свойства
Свойство Device::AsynchronousMode	Свойство Device::LogFile	Свойство Device::SoundList
Свойство Device::BusyCount	Свойство Device::LogLevel	Свойство Device::SoundPath
Свойство Device::CallerDetect	Свойство Device::ReceivedSignals	Свойство Device::State
Свойство Device::CallerId	Свойство Device::RecordedSound	Свойство Device::TTSEngine
Свойство Device::DeviceList	Свойство Device::RingCount	Свойство Device::TTSEngineList
Свойство Device::Echo	Свойство Device::SMSList	Свойство Device::VoiceCommand
События
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             ' Закрываем устройство