[SharkyEXE]

Казбек

Здравствуйте.

1) Если Вы про это ( на примере службы Winmgmt = Инструментарий управления Windows ):
https://cloud.mail.ru/public/FsMR/S2o85Cs8n
https://cloud.mail.ru/public/JZdi/8PzUyVVWj
https://cloud.mail.ru/public/8wtE/e1GrtvxsS
то мне из всего этого бардака=барахла , хочется только статусы , только три слова
STOPPED
RUNNING
PAUSED

2) Только после 100,1% что запущена служба wscsvc , только после 100,1% работает служба wscsvc , повторюсь , проверенной на предмет что 100,1% запущена , проверенной на предмет что 100,1% работает , не одним способом ( sc query "wscsvc" , может еще есть какие-то методы , я был бы очень благодарен ) , я буду делать нижеследующие действия

Скрытый текст

Код:

Opt ( "WinTitleMatchMode", 2 )

$SystemDriveLetter = EnvGet ( "SystemDrive" )

# Панель управления\Все элементы панели управления\Центр поддержки
# Запуск окна с заголовком " Настройка центра поддержки "
Run ( $SystemDriveLetter & "\Windows\System32\control.exe" & " /name Microsoft.ActionCenter /page Settings", "", @SW_HIDE )

# Ожидаем появления окна с заголовком " Настройка центра поддержки "
WinWait ( "Настройка центра поддержки", "" )

# Активируем окно с заголовком " Настройка центра поддержки "
WinActivate ( "Настройка центра поддержки", "" )

WinWaitActive ( "Настройка центра поддержки", "" )

WinSetOnTop ( "Настройка центра поддержки", "", 1 )

# WinSetState ( "Настройка центра поддержки", "", @SW_MAXIMIZE )

# Центр обновления Windows

Func1("Настройка центра поддержки","1")

# Защита от шпионских программ

Func1("Настройка центра поддержки","2")

# Параметры безопасности Интернета

Func1("Настройка центра поддержки","3")

# Контроль учетных записей

Func1("Настройка центра поддержки","4")

# Сетевой брандмауэр

Func1("Настройка центра поддержки","5")

# Защита от вирусов

Func1("Настройка центра поддержки","6")

# Архивация Windows

Func1("Настройка центра поддержки","7")

# Проверка на наличие обновлений

Func1("Настройка центра поддержки","8")

# Устранение неполадок Windows

Func1("Настройка центра поддержки","9")

ControlFocus ( "Настройка центра поддержки", "", "[CLASS:Button; INSTANCE:10]" )
ControlClick ( "Настройка центра поддержки", "ОК", "Button10" )

While WinExists ( "Центр поддержки", "" )
WinClose ( "Центр поддержки", "" )
Sleep ( 1000 )
WEnd

Func Func1($hWnd, $inx)
ControlFocus ($hWnd, '', '[CLASS:Button; INSTANCE: ' & $inx & ']' )
If ControlCommand($hWnd, '', 'Button' & $inx, 'IsChecked') Then
ControlClick($hWnd, '', 'Button' & $inx)
Sleep(1000)
EndIf
EndFunc

Если служба wscsvc не запущена , если служба wscsvc не работает , а везде отчиталось , что служба wscsvc запущена , что служба wscsvc работает - то галочки / птички будут неактивные / затемненные и невозможно будет снять галочки / птички