Объект Device/Свойства/DeviceList
Версия от 07:39, 14 октября 2013; McBurns (обсуждение | вклад)
Свойство 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, "Доступные устройства"