Объект Device/Свойства/DeviceList

Свойство DeviceList позволяет получить список доступных устройств.

Синтаксис

VARIANT DeviceList ()

Описание

Метод позволяет получить список доступных устройств. Если свойство вызывается без параметров - возвращается одномерный массив содержащий список устройств. Если указан любой параметр - список устройств возвращается в виде двумерного массива. Каждая строка — отдельное устройство. Столбцы имеют значение:

• 0 - название устройства;
• 1 - тип устройства в виде числа (0 - звуковая карта, 1 - модем, 2 - TAPI2, 3 - TAPI3, ...);
• 2 - тип устройства в виде строки;
• 3 - идентификатор устройства в виде строки;
• 4 - полное название устройства с типом;
• 5 - текст ошибки при открытии устройства, если устройство открывается с ошибкой.

Примеры

Пример на JavaScript

var Device = new ActiveXObject ("CallOffice.Device");

var List = Device.DeviceList (1).toArray ();      // Получаем список доступных устройств с атрибутами
var AllDevice = "Доступные устройства:\n\n";

for (i = 0; i < List.length; i++) {
   var Dev = List[i].toArray ();              // Получаем атрибуты устройства
   AllDevice += Dev[0]+"\n";    
}
alert (AllDevice);                     // Выводим имя устройства на экран

Пример на VBScript

Dim Device
Set Device = CreateObject ("CallOffice.Device")

List = Device.DeviceList (1)      ' Получаем список доступных устройств с атрибутами
AllDevice = "Доступные устройства:" + Chr(13) + Chr(13)

for i = 0 to UBound (List)
   AllDevice = AllDevice + List(i)(0) + Chr(13)
next

MsgBox AllDevice,  vbOkOnly + VbInformation, "Доступные устройства"

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