begin process at 2008 07 06 20:30:43
1 205 765 membres
328 nouveaux aujourd'hui
14 119 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

FORCER LE REBOOT SOUS WINDOWS NT OU WINDOWS 2000 (REDÉMARRAGE FORCÉ)


Information sur la source

Catégorie :Système Classé sous : reboot, redémarrer, win2000, winnt, shutdown Niveau : Initié Date de création : 26/01/2002 Date de mise à jour : 27/01/2002 00:36:51 Vu / téléchargé: 21 061 / 705

Note :
7,5 / 10 - par 6 personnes
7,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (15)
Ajouter un commentaire et/ou une note


Description

Voici un petit exemple qui peut s'avérer très utile pour forcer le redémarrage d'une station NT ou 2000.  

Source

  • ' Dans votre Form, mettez :
  • ' Un txtbox nommé : TxtNbSec
  • ' Un bouton nommé : BtnReboot
  • Option Explicit
  • Private Declare Function InitiateSystemShutdown Lib "advapi32.dll" Alias "InitiateSystemShutdownA" (ByVal lpMachineName As String, ByVal lpMessage As String, ByVal dwTimeout As Long, ByVal bForceAppsClosed As Long, ByVal bRebootAfterShutdown As Long) As Long
  • Private Sub Apropos_Click()
  • MsgBox ("Forcer le reboot d'une station NT/2000")
  • End Sub
  • Private Sub BtnReboot_Click()
  • InitiateSystemShutdown "\\127.0.0.1", "Ce système va être rebooté suite à la demande de BSDCUBEReboot.", CLng(Me.TxtNbSec.Text), True, True
  • ' Nom de la machine, Message qui va s'afficher, Délai (en seconde, j'ai déjà mis 28800 sec pour programmer l'arrêt et ça marche aussi), Forcer la fermeture des application ouvertes, Redemarrer (false = arrêt)
  • End Sub
  • Private Sub quitter_Click()
  • End
  • End Sub
  • Private Sub TxtNbSec_KeyPress(KeyAscii As Integer)
  • If KeyAscii < 48 Or KeyAscii > 57 Then
  • MsgBox ("Seulement de chiffres")
  • KeyAscii = 0
  • End If
  • End Sub
' Dans votre Form, mettez :
' Un txtbox nommé : TxtNbSec
' Un bouton nommé : BtnReboot

Option Explicit
Private Declare Function InitiateSystemShutdown Lib "advapi32.dll" Alias "InitiateSystemShutdownA" (ByVal lpMachineName As String, ByVal lpMessage As String, ByVal dwTimeout As Long, ByVal bForceAppsClosed As Long, ByVal bRebootAfterShutdown As Long) As Long

Private Sub Apropos_Click()
    MsgBox ("Forcer le reboot d'une station NT/2000")
End Sub

Private Sub BtnReboot_Click()
    InitiateSystemShutdown "\\127.0.0.1", "Ce système va être rebooté suite à la demande de BSDCUBEReboot.", CLng(Me.TxtNbSec.Text), True, True
    ' Nom de la machine, Message qui va s'afficher, Délai (en seconde, j'ai déjà mis 28800 sec pour programmer l'arrêt et ça marche aussi), Forcer la fermeture des application ouvertes, Redemarrer (false = arrêt)
End Sub

Private Sub quitter_Click()
    End
End Sub

Private Sub TxtNbSec_KeyPress(KeyAscii As Integer)
    If KeyAscii < 48 Or KeyAscii > 57 Then
        MsgBox ("Seulement de chiffres")
        KeyAscii = 0
    End If
End Sub

Conclusion

ATTENTION : ne cliquez pas sur le bouton directement car il n'y a aucun moyen d'arrêter le redémarrage du poste. Donc si vous testez, fermez tous vos progs avant ;-)  
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

  • signaler à un administrateur
    Commentaire de Pekinio le 26/01/2002 23:56:07

    nix, la qualité de tes capturent d'écran vont de pis en pis... ;-p quand a ton site, je n te l'dirais jamais assez, bien vu !

  • signaler à un administrateur
    Commentaire de Nix le 27/01/2002 00:45:33 administrateur CS

    Mais elle est bien ma capture non ?

    A++

    Nix

  • signaler à un administrateur
    Commentaire de acidtoxik le 12/05/2002 17:21:16

    t une vrai merde !!! ton prog moi je te le developpe en qques lignes :

    command1_click()
    shell "shutdown -t xx -s"            'xx est en seconde donc tu peu remplacer par text1.text
    end sub

    voila dis-moi si c pas plus facile !!!

  • signaler à un administrateur
    Commentaire de bonbecman le 15/06/2002 16:15:20

    acidtoxik ta pris se pseudo parce que tu fais fuir tout le monde avec sale tronche de con ? Ici, PERSONNE et je dis bien PERSONNE n'a le droit de dire koi que se soi sur NIX, compris car ici la merde c'est pas lui cé toi !

  • signaler à un administrateur
    Commentaire de madVinz le 07/07/2002 02:29:12

    c'est vrai que qd on voit l'endroit ou on surf, on peux pas vraiment dire que Nix soit "une vrai merde"

  • signaler à un administrateur
    Commentaire de gg00xiv le 15/08/2002 03:43:36

    c pas cool d'insulter, si ya plus simple, tu peux le dire plus gentillement, enfin pas en agressivité

  • signaler à un administrateur
    Commentaire de Cerbere le 01/12/2002 18:40:38

    Whaooww, c'est super l'ambiance ici ....
    Enfin bon bref, merci quand même.

  • signaler à un administrateur
    Commentaire de djullz le 26/01/2003 02:07:24

    c koi c commentaires de merde, ça serait bien de nous dire plutôt si le source marche ou marche pas !!!

  • signaler à un administrateur
    Commentaire de Bensashi le 11/10/2003 17:49:23

    Eh bien ce petit programme n'est pas mal pour le reboot par contre pour l'arret total n'y aurait il pas un moyen de couper l'alimentation ? parce que le message disant qu'on peut fermer windows c'est pas top !

    pour acidtoxik : ta ligne de comande ne passe pas sur les W2k, mais sur les XP elle devrait etre bonne.

  • signaler à un administrateur
    Commentaire de Helkanen le 21/12/2003 19:17:23

    Salut Nix
    merci pour cette source
    mais j'ai été obligé de "l'améliorer" en le convertissant en c++
    je sais pas si le problème peut se poser aussi en VB, mais c'était impossible d'initialiser l'arret (renvoi de la valeur 0=false) parce que le processus n'avait pas les autorisations nécessaires (sous XP)
    j'ai donc ajouté une fonction permettant au processus d'acquérir ces autorisations (trouvé dans une autre source)
    et maintenant ça marche...

  • signaler à un administrateur
    Commentaire de Helkanen le 21/12/2003 21:05:34

    de plus, je dois ajouter qu'on peut tout à fait annuler cette fonction simplement en utilisant l'autre API :

    BOOL AbortSystemShutdown(
      LPTSTR lpMachineName
    );

    on fait donc :
    AbortSystemShutdown("")

    et c'est bon

    Pour ce que j'ai dit au-dessus, les privilèges sont accordés grâce à la fonction AdjustTokenPrivileges() (API)... allez voir d'autres sources pour plus d'infos

    Helkanen

  • signaler à un administrateur
    Commentaire de tahiti_bob le 16/11/2004 21:35:16

    Bonjour,

    Pour lancer le redémarrage forcé, il faut executer la commande "shutdown -t 60 -s".

    Mais on peut a tout moment interrompre le compte à rebours avec la commande "shutdown -a".
    ( c'est comme ca qu'il fallait empecher le virus Sasser de redémarrer leposte).

    @++
    Tahiti_bob

  • signaler à un administrateur
    Commentaire de Nix le 23/02/2006 03:27:34 administrateur CS

    Pour l'idiot du village (sans le nommer acidtoxik) la commande dos "shutdown" n'est que dans Win XP et Win 2003 ! Et le titre de ma source stipule bien Win NT et Win 2000 !

  • signaler à un administrateur
    Commentaire de CORBnet le 09/03/2007 22:28:07

    lol faut pas le vexer il s'est juste enflammé  quelques secondes parce qu'il s'est cru +fort que Nix c pa grav :p

  • signaler à un administrateur
    Commentaire de linuxtonton le 06/05/2007 08:43:22

    Bonjour à toutes et à tous,
    Grand merci à "Nix" pour ce site et surtout pour ce petit programme.
    Je vais vite l'essayer.

Ajouter un commentaire

Pub



Appels d'offres

WEB DESIGN
Budget : 1 000€
Plugin Dialer outlook
Budget : 2 000€
Travail graphique- ill...
Budget : 1 000€

Snippets en rapport

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS