Показать сообщение отдельно
Старый 24.11.2017, 16:02   #152
duzzy
Гуру
 
Регистрация: 01.06.2013
Регион: 78, 98
Машина: SUBARU Impreza WRX
Сообщений: 1,766
duzzy has a reputation beyond reputeduzzy has a reputation beyond reputeduzzy has a reputation beyond reputeduzzy has a reputation beyond reputeduzzy has a reputation beyond reputeduzzy has a reputation beyond reputeduzzy has a reputation beyond reputeduzzy has a reputation beyond reputeduzzy has a reputation beyond repute
По умолчанию

seriousstas

Нововводители мля)))
И чего теперь мне все свои посты в подпись пихать.......... на кой хрен трогать то что работает... не пойму

Ты хотел проверку
Вот держи...

PHP код:
;#NoTrayIcon
#include <Encoding.au3>
#include <AutoItConstants.au3>

Global $sstate
$is_run 
1

While $is_run
    $state_check 
check_state()
    
ConsoleWrite('debug $state_check = ' $state_check & @CRLF) ;debug

        
If($state_check == 'отключено'Then
            ConsoleWrite
('debug NET DISABLE' & @CRLF) ;debug
        
Else
            
ConsoleWrite('debug NET ENABLE' & @CRLF) ;debug
        
EndIf


    
Sleep(5000)
WEnd

Func check_state
()
    
$iPID Run('netsh.exe wlan show interfaces''', @SW_HIDE$STDERR_CHILD $STDOUT_CHILD)
    
$sOut ''
    
ProcessWaitClose($iPID)
    Do
        
$sOut &= StdoutRead($iPID)
    
Until @error
    $aResult 
StringRegExp(_Encoding_866To1251($sOut), '(Состояние) *: *(.+) *'1)

    If 
UBound($aResult) >= 2 Then
        $sstate 
$aResult[1]
    EndIf

    Return 
$sstate
EndFunc   
;==>check_state 
Только это проверка на подключение как я писал ранее, т.е. даже если выключить адаптер ты будешь получать "Подключено".
...
duzzy вне форума   Ответить с цитированием