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

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

Пользователь


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

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


Код: Выделить весь код
#include <Constants.au3>
#include <Encoding.au3>

$comand="dsquery"
$foo = Run(@ComSpec & " /c powershell " & $comand, @SystemDir, @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)
$out=""
$line=""

While 1
    $line = StdoutRead($foo)
    If @error Then ExitLoop
    if $line <>"" then $out=$out & _StringOEM2ANSI($line)
	
Wend

	MsgBox(0,"",$out)
рабочий вариант но всё равно не нравится.....

Последний раз редактировалось andr_mozg, 16-12-2009 в 17:31.


Отправлено: 17:15, 16-12-2009 | #5