Apprendre le Hack Index du Forum
Apprendre le Hack

 
Apprendre le Hack Index du ForumFAQRechercherS’enregistrerConnexion

:: Test de vitesse de reboot système. vbs ::

 
Poster un nouveau sujet   Répondre au sujet    Apprendre le Hack Index du Forum -> A trié
Sujet précédent :: Sujet suivant  
Auteur Message
Inf3rnus
Administrateur

Hors ligne

Inscrit le: 22 Aoû 2011
Messages: 196

MessagePosté le: Dim 11 Déc - 14:12 (2011)    Sujet du message: Test de vitesse de reboot système. vbs Répondre en citant

Voici le code source d'un script qui permet de calculer le temps de reboot d'un pc sous windows.







  1. Option Explicit  
  2.   
  3. On Error Resume Next  
  4.   
  5. Dim Wsh, Time1, Time2, Result, PathFile, MsgResult, MsgA, AppName, KeyA, KeyB, TimeDiff  
  6.   
  7. MsgA = "Fermez toutes les applications en cours et cliquez sur OK."  
  8.   
  9. KeyA = "HKEY_CURRENT_USER\Software\RestartTime\"  
  10.   
  11. KeyB = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\RestartTime"  
  12.   
  13. AppName = "Restart-Time"  
  14.   
  15. Set Wsh = CreateObject("WScript.Shell")  
  16.   
  17. PathFile = """" & WScript.ScriptFullName & """"  
  18.   
  19. Result = wsh.RegRead(KeyA & "Times")  
  20.   
  21. if Result = "" then  
  22.   
  23. MsgResult = Msgbox (MsgA, vbOKCancel, AppName)  
  24.   
  25. If MsgResult = vbcancel then WScript.Quit  
  26.   
  27. Wsh.RegWrite KeyA & "Times", left(Time,8), "REG_SZ"  
  28.   
  29. Wsh.RegWrite KeyB, PathFile, "REG_SZ"  
  30.   
  31. Wsh.Run "cmd /c Shutdown -r -t 00", false, 0  
  32.   
  33. else  
  34.   
  35. Wsh.RegDelete KeyA & "Times"  
  36.   
  37. Wsh.RegDelete KeyA  
  38.   
  39. Wsh.RegDelete KeyB  
  40.   
  41. TimeDiff = DateDiff("s",Result,left(Time,8))  
  42.   
  43. MsgBox "PC redémarré en " & TimeDiff & " secondes", VbInformation, AppName  
  44.   
  45. end if  
  46.   
  47. wscript.Quit  




_________________


Revenir en haut
Publicité






MessagePosté le: Dim 11 Déc - 14:12 (2011)    Sujet du message: Publicité

PublicitéSupprimer les publicités ?
Revenir en haut
Montrer les messages depuis:   
Poster un nouveau sujet   Répondre au sujet    Apprendre le Hack Index du Forum -> A trié Toutes les heures sont au format GMT + 2 Heures
Page 1 sur 1

 
Sauter vers:  




Index | creer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Powered by phpBB © 2001, 2005 phpBB Group
Traduction par : phpBB-fr.com