Возможно ли для VBScript проверить, находится ли определенное устройство в диспетчере устройств?

Question

В моем диспетчере устройств есть "Realtek USB FE Family Controller". После того, как компьютер выходит из спящего режима, иногда контроллер не может быть распознан, и для его распознавания необходимо запустить TK_NIC_DRIVER_INSTALLER.sfx.exe.

Возможно ли для VBScript проверить наличие контроллера? Если его там нет, будет выполнена следующая команда.

CreateObject("wscript.shell").run("""C:\RTK_NIC_DRIVER_INSTALLER.sfx.exe"""),0

Answer 1

Вы можете использовать класс WMI win32_PnPEntity. Здесь мы просто перебираем и проверяем устройства с таким описанием:

strComputer = "." 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_PnPEntity")
For Each objItem In colItems
    If InStr(1, objItem.Description, "Realtek USB FE Family Controller", 1) > 0 Then
        CreateObject("wscript.shell").run("""C:\RTK_NIC_DRIVER_INSTALLER.sfx.exe"""),0
    End If
Next

Если это не сработает, вам также может понадобиться проверить objItem.Настоящее или объективное.Статус