Объект 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.