Имя пользователя:
Пароль:
 

Название темы: [решено] StdOutRead и ShellExecute
Показать сообщение отдельно

Аватара для madmasles

Ветеран


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

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


Цитата saavaage:
не могу понять, что мешает... »
Странно. У меня все выводится, причем с тремя вариантами:
Код: Выделить весь код
#include <Constants.au3>
#include <Encoding.au3>
#include <GUIConstantsEx.au3>

#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 445, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 104, 24, 433, 385)
$sLog = ''
;$hIPconfig = Run(@ComSpec & ' /C CSCRIPT %SYSTEMROOT%\system32\eventquery.vbs /fi "Type eq ERROR" /fo TABLE /NH', '', @SW_HIDE, $STDOUT_CHILD)
$hIPconfig = Run('CSCRIPT.exe ' & @SystemDir & '\eventquery.vbs /fi "Type eq ERROR" /fo TABLE /NH', '', @SW_HIDE, $STDOUT_CHILD)
;$hIPconfig = Run(@ComSpec & ' /C CSCRIPT ' & @SystemDir & '\eventquery.vbs /fi "Type eq ERROR" /fo TABLE /NH', '', @SW_HIDE, $STDOUT_CHILD)
While 1
    $sLog &= StdoutRead($hIPconfig)
    If @error Then ExitLoop
    Sleep(10)
WEnd
GUICtrlSetData($Edit1, _Encoding_866To1251($sLog))
$Button1 = GUICtrlCreateButton("Обновить", 16, 120, 65, 57)
GUICtrlSetState(-1, $GUI_FOCUS)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            GUICtrlSetData($Edit1, '')
            $sLog = ''
            ;$hIPconfig = Run(@ComSpec & ' /C CSCRIPT %SYSTEMROOT%\system32\eventquery.vbs /fi "Type eq ERROR" /fo TABLE /NH', '', @SW_HIDE, $STDOUT_CHILD)
            $hIPconfig = Run('CSCRIPT.exe ' & @SystemDir & '\eventquery.vbs /fi "Type eq ERROR" /fo TABLE /NH', '', @SW_HIDE, $STDOUT_CHILD)
            ;$hIPconfig = Run(@ComSpec & ' /C CSCRIPT ' & @SystemDir & '\eventquery.vbs /fi "Type eq ERROR" /fo TABLE /NH', '', @SW_HIDE, $STDOUT_CHILD)
            While 1
                $sLog &= StdoutRead($hIPconfig)
                If @error Then ExitLoop
                Sleep(10)
            WEnd
            GUICtrlSetData($Edit1, _Encoding_866To1251($sLog))
    EndSwitch
WEnd

Последний раз редактировалось madmasles, 14-08-2010 в 10:50. Причина: поправил код

Это сообщение посчитали полезным следующие участники:

Отправлено: 10:34, 14-08-2010 | #8

Название темы: [решено] StdOutRead и ShellExecute