Detre
Новичок
- Сообщения
- 70
- Репутация
- 0
Вопрос возможно странный, но я хотел бы задать условие скрипту. Как сделать так, чтобы при отметке всех чекбоксов, ничего не происходило?
Код:
Func _Button1()
$rHostName = GUICtrlRead($iHostName)
If GUICtrlRead($Checkbox1) = 1 Then ;отмечен чекбокс
RunWait(@ComSpec & ' /c C:\Windows\System32\Ping.exe ' & $rHostName & '')
EndIf
If GUICtrlRead($Checkbox2) = 1 Then ;отмечен чекбокс
RunWait(@ComSpec & ' /c PsPasswd \\' & $rHostName & ' Администратор Mik35')
EndIf
If GUICtrlRead($Checkbox3) = 1 Then ;отмечен чекбокс
RunWait(@ComSpec & ' /c copy /y "' & @ScriptDir & '\LOGUS\Logus.bat" \\' & $rHostName & '\C$')
EndIf
If GUICtrlRead($Checkbox4) = 1 Then ;отмечен чекбокс
DirCopy(@ScriptDir & "\KDL-MICROB", "\\" & $rHostName & "\C$\PROGRA~1", 1)
EndIf
If GUICtrlRead($Checkbox5) = 1 Then ;отмечен чекбокс
RunWait(@ComSpec & ' /c copy /y "' & @ScriptDir & '\CCSP\CCSPPoint.bat" \\' & $rHostName & '\C$\CCSP')
RunWait(@ComSpec & " /c psexec exit")
EndIf
EndFunc
Последнее редактирование: