Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Googler


Сообщения: 3665
Благодарности: 1563

Профиль | Отправить PM | Цитировать


TERMINAL
Цитата:
Желательно того на которое драйвера не установлены »
проще всего при помощи DevCon, пример использования в AutoIT:
Код: Выделить весь код
#include <Constants.au3>

$out = ""
$txt = ""
; Запуск DEVCON
$foo = Run(@ComSpec & " /C DevCon ListClass Unknown", @SystemDir, @SW_HIDE, $STDOUT_CHILD)
; Чтение результата
While 1
    $out &= StdoutRead($foo)
    If @error Then ExitLoop
Wend
; Парсинг результата в массив
$arr = StringRegExp($out, "(?:[&\w]+\\)+[&\w]+", 3)
; Вывод массива на экран
If IsArray($arr) Then
    For $i=0 To UBound($arr)-1
        $txt &= $arr[$i] &@CRLF
    Next
EndIf
MsgBox(0,"",$txt)
P.S. для скрипта devcon.exe должен лежать в System32

Последний раз редактировалось amel27, 11-11-2008 в 11:43.


Отправлено: 05:13, 10-11-2008 | #1115