Объект Device/Методы/Listen

Материал из Call Office Wiki
Версия от 10:14, 14 ноября 2014; McBurns (обсуждение | вклад)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к навигации Перейти к поиску
Метод Listen выполняет прослушивание линии.

Синтаксис

DeviceResult Listen ([LONG Timeout], LONG * Result)

Параметры

Timeout - время прослушивания линии в секундах. Необязательный параметр. При отсутствии параметра значение по умолчанию - 60.

Результат

Название константы Значение Описание
DEVICE_S_OK 0 (0x00) прослушивание линии завершено успешно
DEVICE_S_FAILED 1 (0x01) ошибка прослушивания линии
DEVICE_S_INTERRUPTED 4 (0x04) прослушивание линии прервано
DEVICE_S_TIMEOUT 5 (0x05) время ожидания при прослушивании линии истекло
DEVICE_S_BUSY 6 (0x06) при прослушивании обнаружен сигнал занято

Описание

Метод осуществляет прослушивание линии. Сигнал с линии записывается и может быть получен свойством Device::RecordedSound. Выполнение метода прекращается, если истекло время ожидания, метод прерван вызовом метода Cancel или обнаружен сигнал Занято.

Примеры

Пример на JavaScript
var Device = new ActiveXObject ("CallOffice.Device");
Device.Open ();

var NumberPhone = prompt ("Введите номер телефона",'');

var Result = Device.Dial (NumberPhone, 40);
if (Result == 0){
   Device.Say ("CallOffice");
   Device.Listen (40);                           // Выполням запись сообщения с линии в течении 40 секунд
   var Sound = Device.RecordedSound;             // Получаем записанный звук
   Sound.Save ("C:\\Записанное сообщение.wav");  // Сохраняем записанное сообщение в файл
}
Device.HangUp ();
Device.Close ();
Пример на VBScript
Dim Device
Set Device = CreateObject ("CallOffice.Device")
NumberPhone = prompt ("Введите номер телефона","")
Device.Open

Result = Device.Dial (NumberPhone, 40)

if Result = 0 then
   Device.Say "CallOffice"
   Device.Listen 40                              ' Выполням запись сообщения с линии в течении 40 секунд
   Dim Sound
   Set Sound = Device.RecordedSound              ' Получаем записанный звук
   Sound.Save "C:\\Записанное сообщение.wav"     ' Сохраняем записанное сообщение в файл

end if

Device.HangUp
Device.Close

Назад к методам объекта Device.