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

Метод WaitForAnswer ожидает голосовой ответ абонента заданное время.

  Метод устарел, следует использовать WaitForIncoming.

Синтаксис

WaitForAnswer (LONG Timeout, LONG * Result)

Параметры

Timeout	- время ожидания голосового ответа абонента в секундах.
Если время ожидания указано, после набора номера выполняется ожидание голосового ответа абонента в течение указанного времени.

==Результат==

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

=Описание

Метод ожидает голосовой ответ абонента заданное время. Как правило метод используется сразу после набора номера. Ожидание может быть прервано асинхронным вызовом функции Cancel.

Примеры

Пример на JavaScript

var Device = new ActiveXObject ("CallOffice.Device");
var NumberPhone = prompt ("Введите номер телефона",'');
Device.Open ();

var Result = Device.Dial (NumberPhone);
if (Result == 0){

   Result = Device.WaitForAnswer (40);
   if (Result == 0) {
      Device.Say ("CallOffice");
   }

   Device.HangUp ();
}
Device.Close ();

Пример на VBScript

Dim Device
Set Device = CreateObject ("CallOffice.Device")
NumberPhone = prompt ("Введите номер телефона","")

Device.Open

Result = Device.Dial (NumberPhone)
if Result = 0 then

   Result = Device.WaitForAnswer (40)
   if Result = 0 then
      Device.Say "CallOffice"
   end if

   Device.HangUp
end if

Device.Close

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