[..] Checkbox Shutdown distant et local
Posté : jeu. 22 déc. 2011 16:16
Bonjour, je développe en ce moment une sorte de panel qui reste sur la gauche de l'écran pour moi et mes collègues, et je bloque sur des checkbox (jamais utilisé avant dans le script), voilà le principe:
J'ai une Inputbox ($input1) avec le nom du PC client.
J'ai un bouton shutdown (éteindre), et deux checkboxs juste à coté:
-PC distant
-PC local
J'aimerais qu'en cochant l'une ou l'autre checkbox ça exécute l'action appropriée.
Avec ce code, le script ne va pas plus loin que le premier Msgbox (même lorsqu'un PC distant allumé est inscrit dans l'Input1), même en Checkbox PC Local; J'ai essayé je ne sais combien de solutions et toute aboutissent au même résultat: le script ne dépasse pas la première vérification même si celle-ci est fausse.
MERCI, je m'en remet à vous car je n'ai plus d'idées...
J'ai une Inputbox ($input1) avec le nom du PC client.
J'ai un bouton shutdown (éteindre), et deux checkboxs juste à coté:
-PC distant
-PC local
J'aimerais qu'en cochant l'une ou l'autre checkbox ça exécute l'action appropriée.
Code : Tout sélectionner
;-------------------------------------------------------------------------------------------------------------------------------
;-------------------------------------Bouton Eteindre---------------------------------------------------------------------------
;-------------------------------------------------------------------------------------------------------------------------------
while 1
Select
Case $msg = $Button25
;-------------------Distant-------------------------
If GUICtrlGetState($Check1) =1 And Ping($rinput) = 0 Then
MsgBox(64, "Information", "Impossible de joindre l'hôte " & $rinput)
ElseIf GUICtrlGetState($Check1) = 1 And Ping($rinput) = 1 Then
Run(@ComSpec & ' /c shutdown -f -s -m \\' & $rinput & ' -c ' & $Input3, @SystemDir, @SW_HIDE)
MsgBox(0, "Extinction du système distant", "Le système distant va s'éteindre")
ElseIf GUICtrlGetState($Check2) = 1 Then
Run(@ComSpec & "/c shutdown -s -t 30")
ExitLoop
EndIf
EndSelect
WEnd
MERCI, je m'en remet à vous car je n'ai plus d'idées...