Voila
J'espere ke ca fonctionne. Normalement, ca te donne une boite de dialogue : tu marque le nom de la machine et clique sur "Ok".
@ ++
BILALoch
Hackdevil
Messages postés28Date d'inscriptiondimanche 2 janvier 2005StatutMembreDernière intervention 5 mai 2014 2 janv. 2005 à 04:48
Bon ben chez moi ça ne marche pas :(
Je n'ai jamais réussi à faire marcher ton script et encore moin la technique par executer: ShutDown m:\\nom_machine -s -f -t 0
Le pc que j'aimerais éteindre s'appelle Toto.
Donc je dois faire:
J'ai une boite de dialogue qui s'ouvre ou il y a marqué Toto et un champ libre pour ecrire quelque chose et a droite ok ou annuler.
Merci de m'aider svp je suis un debutant en programmation et je n'y connais absolument rien pour le moment.
cs_MasterHack
Messages postés586Date d'inscriptionjeudi 18 septembre 2003StatutMembreDernière intervention13 février 20082 21 oct. 2004 à 12:27
Merci Yoman, c'est simple eux ils cherchent seulement de quoi critiquer.
j'ai pas mis de gestion d'erreur pour que les debutons ne soient pas terrifie de la taille du code.
si non j'aurai tout simplement ecrit :
Executer:ShutDown m:\\nom_machine -s -f -t 0
voila pour les amateurs DOS
cette simple information vaux plus que 1 si c'etait pas 0
Merci toutfois
cs_yoman64
Messages postés592Date d'inscriptionsamedi 19 janvier 2002StatutMembreDernière intervention 4 décembre 2008 21 oct. 2004 à 02:24
Pas cool sa d'avoir mis 1/10 :-O
Je vais mettre 10/10 pour remonter la note!
Perso j'ai pas Xp , je peux pas tester :-S mais c pas grave, j'ai rien vu dans le code qui mérite de mettre 1/10 :-@
YoMan64
PhPKoDe.Com
bilaloch
Messages postés556Date d'inscriptionlundi 6 octobre 2003StatutMembreDernière intervention31 octobre 20191 18 oct. 2004 à 13:56
Tiens cela ressemble etrangement a mon code. Cela dit je n'accuse personne.
@ +
BILALoch
DJsaadi95
Messages postés21Date d'inscriptionlundi 15 décembre 2003StatutMembreDernière intervention 9 mai 2005 18 oct. 2004 à 12:29
Tu peut ajouter pour que quand on click sur annuler de l'input box
if machine = vbnullstring then
MsgBox "Veuillez écrire le nom de votre machine"
end if
Tu peut rajouter des styles a la Msgbox mais je me sentais pas de l'écrire :p lol
econs
Messages postés4030Date d'inscriptionmardi 13 mai 2003StatutMembreDernière intervention23 décembre 200824 18 oct. 2004 à 06:51
Et à la limite, pourquoi mettre Dim Temp;Temp=0; ...& Temp.
Tu peux directement remplacer Temp par 0 dans ton instruction.
T'inquiètes pas. Je n'ai pas de grief envers ton code. J'essaie juste de t'aider à l'améliorer. :o)
econs
Messages postés4030Date d'inscriptionmardi 13 mai 2003StatutMembreDernière intervention23 décembre 200824 18 oct. 2004 à 06:49
Et si Machine vaut "" ??? (suite au clic du bouton Annuler de l'InputBox)
2 janv. 2005 à 19:02
j'ajoute qu'il faut :
1:avoir WMI installe (pas de prob avec >=win 2000)
2:etre adinistarteur du reseau.
merci tous
2 janv. 2005 à 09:54
Dim Machine As String
Dim Temp As Long
Temp = 0
Machine = InputBox("Quelle machine du reseau a éteindre")
Shell "ShutDown -m \" & Machine & " -s -f -t " & Temp
Voila
J'espere ke ca fonctionne. Normalement, ca te donne une boite de dialogue : tu marque le nom de la machine et clique sur "Ok".
@ ++
BILALoch
2 janv. 2005 à 04:48
Je n'ai jamais réussi à faire marcher ton script et encore moin la technique par executer: ShutDown m:\\nom_machine -s -f -t 0
Le pc que j'aimerais éteindre s'appelle Toto.
Donc je dois faire:
Dim Machine
Dim Temp
Temp=0
Machine=InputBox("Toto")
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run ("ShutDown -m \" & Machine & " -s -f -t " & Temp)
?
J'ai une boite de dialogue qui s'ouvre ou il y a marqué Toto et un champ libre pour ecrire quelque chose et a droite ok ou annuler.
Merci de m'aider svp je suis un debutant en programmation et je n'y connais absolument rien pour le moment.
21 oct. 2004 à 12:27
j'ai pas mis de gestion d'erreur pour que les debutons ne soient pas terrifie de la taille du code.
si non j'aurai tout simplement ecrit :
Executer:ShutDown m:\\nom_machine -s -f -t 0
voila pour les amateurs DOS
cette simple information vaux plus que 1 si c'etait pas 0
Merci toutfois
21 oct. 2004 à 02:24
Je vais mettre 10/10 pour remonter la note!
Perso j'ai pas Xp , je peux pas tester :-S mais c pas grave, j'ai rien vu dans le code qui mérite de mettre 1/10 :-@
YoMan64
PhPKoDe.Com
18 oct. 2004 à 13:56
@ +
BILALoch
18 oct. 2004 à 12:29
if machine = vbnullstring then
MsgBox "Veuillez écrire le nom de votre machine"
end if
Tu peut rajouter des styles a la Msgbox mais je me sentais pas de l'écrire :p lol
18 oct. 2004 à 06:51
Tu peux directement remplacer Temp par 0 dans ton instruction.
T'inquiètes pas. Je n'ai pas de grief envers ton code. J'essaie juste de t'aider à l'améliorer. :o)
18 oct. 2004 à 06:49