Как можно получить id клавиатуры программой
------------ Дoбавленo в 17.43:
как я понимаю это я правильно айди нахожу?
#bas
On Error Resume Next
Set objService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\CIMV2")
If Err.Number <> 0 Then
WScript.Echo Err.Number & ": " & Err.Description
WScript.Quit
End If
For Each objKeyb In objService.ExecQuery("SELECT * FROM Win32_Keyboard")
Exit For
Next
WScript.Echo objKeyb.DeviceID 'адрес или другая уникальная информация идентификации
Я получил в ответи usb\vid_ffc0&pid_0040\6&29e6b3c2&0&4
------------ Дoбавленo в 17.56:
disable- это как я понял отключить а включить как?)
Поиск
Друзья
Администрация