Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[VBS] Dernier Arrêt & Dernier Démarrage de Windows (XP)
Auteur Message
Répondre en citant
Message [VBS] Dernier Arrêt & Dernier Démarrage de Windows (XP) 

Voila un Vbscript qui vous montre comment afficher le Dernier Arrêt et le Dernier Démarrage de Windows par 2 méthodes différentes.
1ère Méthode : un peu complexe car c'est un mélange entre le Vbscript et quelques commandes en DOS pour afficher le Dernier Arrêt & le Dernier Démarrage de Windows dans une Console.
2ème Méthode : plus simple dans le même script en utilisant le ws.RegRead et les afficher dans un MsgBox.
NB : Compatible avec Windows XP Seulement
Code:
[lang=vb]Titre = "Dernier Arrêt & Dernier Démarrage de Windows by © Hackoo 2012"
'Méthode 1 un peu complexe :)
Set ws = CreateObject("wscript.Shell")
Command1 = "cmd /c reg query ""HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Prefetcher"" > %tmp%\Prefetcher.txt"
Command2 = "cmd /c @echo off & Color 9B & Title Start and Exit Time by © Hackoo 2012 & mode con cols=60 lines=20 & for /f ""tokens=3"" %i in ('Type %tmp%\Prefetcher.txt ^| find ""ExitTime""') do @echo Dernier arret de Windows ............ : %i & for /f ""tokens=3"" %i in ('Type %tmp%\Prefetcher.txt ^| find ""StartTime""') do @echo Dernier demarrage de Windows ........ : %i & Pause "
Exec1 = ws.run(Command1,0,True)'Le Paramètre 0 pour ne pas afficher la console du DOS
Exec2 = ws.run(Command2,1,True)'Le Paramètre 1 pour afficher la console du DOS
'************************************************************************************
'Méthode 2 plus simple :)
ExitTime = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Prefetcher\ExitTime"
StartTime = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Prefetcher\StartTime"
Msgbox "    Le Dernier arrêt de Windows été le : "& Ws.RegRead(ExitTime),64,Titre
Msgbox "    Le Dernier démarrage de Windows été le : " & Ws.RegRead(StartTime),64,Titre





______________________________________________________
Mes Contributions en Téléchargement
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message [VBS] Dernier Arrêt & Dernier Démarrage de Windows (XP) 
Salut, cette clé de registre est intéressante mais ces valeurs ne sont pas disponible sur Windows 7. Dommage.




______________________________________________________
Mes principales réalisations: Cp (batch) et IPSvc (autoit)
Message [VBS] Dernier Arrêt & Dernier Démarrage de Windows (XP) 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch