En Wscript lister les programmes en exéction

En Wscript lister les programmes en exéction - Win NT/2K/XP - Windows & Software

Marsh Posté le 20-12-2010 à 22:23:33    

Bonsoir,
 
 
En Wscript je souhaite lancer un script de fermeture Windows (voir ci-dessous :ce n'est qu'une ébauche)
 
 
Set WshShell = WScript.CreateObject("WScript.Shell" )
reponse = MsgBox("Voulez vous faire la sauvegarde des données avant la fermeture de Windows", vbYesNo, "Fermeture de Windows" )
if reponse = 6 then
reponse = MsgBox("Vous avez choisi la sauvegarde : avez-vous arrête toutes vos applications ?", vbYesNo, "Fermeture de Windows" )
if reponse = 6 then
call WshShell.Run("e:\mes_documents\groobax\svtdata.groobax-job" )
else  
Wshshell.run "taskmgr"
 
reponse = MsgBox("avez-vous arreté toutes vos applications ?", vbYesNo, "Fermeture de Windows" )
if reponse = 6 then
call WshShell.Run("e:\mes_documents\groobax\svtdata.groobax-job" )
wscript.quit
end if
end if
else
reponse = MsgBox("Mise en veille prolongée ?", vbYesNo, "Fermeture de Windows" )
if reponse = 6 then
call WshShell.Run("rundll32.exe powrprof.dll,SetSuspendState" )
else
call WshShell.Run("rundll32.exe hell32.dll,SHExitWindowsEx 8" )
end if
end if
wscript.quit

 
Au lieu de "Wshshell.run "taskmgr" je voudrais une commande qui me permette  de lister tous les programmes en cours d'exécution afin d'être sûr de tous les fermer avant de lancer ma sauvegarde (tous fichiers utilisés ne pouvant être sauvegardé)
 

Reply

Marsh Posté le 20-12-2010 à 22:23:33   

Reply

Marsh Posté le 23-12-2010 à 23:22:32    

Tu peux passer par WMI pour ce genre de tâches :
http://msdn.microsoft.com/en-us/li [...] s.85).aspx
 
Tu trouveras surement d'autres personnes ayant déjà fait cela :
http://www.google.fr/search?hl=fr& [...] ses+&meta=
 

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed