Объект Device/Методы/Listen: различия между версиями
Перейти к навигации
Перейти к поиску
McBurns (обсуждение | вклад) м (McBurns переименовал страницу Компонент Device/Методы/Listen в Объект Device/Методы/Listen без оставления перенаправления) |
McBurns (обсуждение | вклад) |
||
Строка 1: | Строка 1: | ||
Метод '''Listen''' выполняет прослушивание линии. | Метод '''Listen''' выполняет прослушивание линии. | ||
==Синтаксис== | |||
:<syntaxhighlight lang="c"> | |||
DeviceResult Listen ([LONG Timeout], LONG * Result) | |||
</syntaxhighlight> | |||
==Параметры== | |||
{| | :{| | ||
|- | |- | ||
|'''Timeout''' | |'''Timeout''' | ||
Строка 11: | Строка 13: | ||
|} | |} | ||
==Результат== | |||
{|border="1" | :{|border="1" cellspacing="0" | ||
|- | |- | ||
|style="background-color:#eeeeee; width:30%;" cellpadding="0" cellspacing="0" align="center"|'''Название константы''' | |style="background-color:#eeeeee; width:30%;" cellpadding="0" cellspacing="0" align="center"|'''Название константы''' | ||
Строка 35: | Строка 37: | ||
|} | |} | ||
==Описание== | |||
:Метод осуществляет прослушивание линии. Сигнал с линии записывается и может быть получен свойством [[Компонент_Device/Свойства/RecordedSound|Device::RecordedSound]]. Выполнение метода прекращается, если истекло время ожидания, метод прерван вызовом метода [[Компонент_Device/Методы/Cancel|Cancel]] или обнаружен сигнал Занято. | |||
==Примеры== | |||
:Пример на JavaScript | |||
<syntaxhighlight lang="javascript"> | |||
var Device = new ActiveXObject ("CallOffice.Device"); | |||
Пример на JavaScript | |||
< | |||
Device.Open (); | Device.Open (); | ||
Строка 56: | Строка 57: | ||
Device.HangUp (); | Device.HangUp (); | ||
Device.Close (); | Device.Close (); | ||
</ | </syntaxhighlight> | ||
Пример на VBScript | :Пример на VBScript | ||
< | <syntaxhighlight lang="vb"> | ||
Dim Device | |||
Set Device = CreateObject ("CallOffice.Device") | Set Device = CreateObject ("CallOffice.Device") | ||
NumberPhone = prompt ("Введите номер телефона","") | NumberPhone = prompt ("Введите номер телефона","") | ||
Строка 76: | Строка 78: | ||
Device.HangUp | Device.HangUp | ||
Device.Close</ | Device.Close | ||
</syntaxhighlight> | |||
Назад к [[ | Назад к [[Объект_Device/Методы|методам]] объекта [[Объект_Device|Device]]. |
Версия 06:12, 8 октября 2013
Метод Listen выполняет прослушивание линии.
Синтаксис
DeviceResult Listen ([LONG Timeout], LONG * Result)
Параметры
Timeout - время прослушивания линии в секундах. Необязательный параметр. При отсутствии параметра значение по умолчанию - 60.
Результат
Название константы Значение Описание DEVICE_S_OK 0 (0x00) прослушивание линии завершено успешно 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