planifier l arret d'un service ?

planifier l arret d'un service ? - Win NT/2K/XP - Windows & Software

Marsh Posté le 09-07-2004 à 16:28:05    

Comment peut on planifier l arret d'un service sous win2K ?
Et apres lancer un defrag d:
puis relancer ce meme service une fois le defrag terminé


Message édité par Grumly- le 09-07-2004 à 16:28:25
Reply

Marsh Posté le 09-07-2004 à 16:28:05   

Reply

Marsh Posté le 09-07-2004 à 16:46:54    

quel service ?
on pourrait trouver si une ligne de commande est dispo (comme pour apache) pour tuer le service (ça te permettrait de mettre ça dans un simple .bat et dans un planificateur)
sinon il faudrait passer par un logiciel plus avancé, qui tuera la tâche directement.

Reply

Marsh Posté le 09-07-2004 à 16:58:10    

pour arreter le service j'ai trouvé c net stop service
par contre pour planifier la tache de defrag derriere c plus chiant et je trouve pas vu que defrag.exe existe pas sous 2k.

Reply

Marsh Posté le 09-07-2004 à 17:35:09    

trouvé sur un forum
 

Code :
  1. ' VBScript source code
  2. '
  3. ' Defrag Windows 2000 Script
  4. '
  5. '
  6. ' Schedule this script to automate defragmenting.
  7. '
  8. '
  9. set WshShell = CreateObject("WScript.Shell" )
  11. 'Launch Defrag from the command line and wait for 2 seconds
  12. WshShell.Run "dfrg.msc"
  13. WScript.Sleep 2000
  15. 'Wait until the application has loaded - Check every second
  16. While WshShell.AppActivate("Disk Defragmenter" ) = FALSE
  17. wscript.sleep 1000
  18. Wend
  20. 'Bring the application to the foreground
  21. WshShell.AppActivate "Disk Defragmenter"
  22. WScript.Sleep 500
  24. 'Send keys to move to top of drive/partition table.
  25. WshShell.SendKeys "{TAB}{HOME}"
  26. WScript.Sleep 501
  28. 'Send an ALT-A key to bring down the defrag menu
  29. WshShell.SendKeys "%A"
  30. WScript.Sleep 502
  32. 'Send a D to start the defrag
  33. WshShell.SendKeys "D"
  35. 'Wait until the defrag is completed - Check for window every 5 seconds
  36. While WshShell.AppActivate("Defragmentation Complete" ) = FALSE
  37. wscript.sleep 5001
  38. Wend
  40. 'Bring the Defragmentation Complete window to the foreground
  41. WshShell.AppActivate "Defragmentation Complete"
  42. WScript.Sleep 503
  44. 'Send a tab key to move the focus from View Report button to the Close Button
  45. WshShell.Sendkeys "{TAB}"
  46. Wscript.Sleep 504
  48. 'Send key to Close the Defragmentation Complete window
  49. WshShell.Sendkeys "{ENTER}"
  50. Wscript.Sleep 505
  52. 'End - Bring the application to the foreground
  53. WshShell.AppActivate "Disk Defragmenter"
  54. WScript.Sleep 700
  56. 'End - Send an ALT-F4 to Close the Defrag program
  57. WshShell.Sendkeys "%{F4}"

Reply

Marsh Posté le 09-07-2004 à 17:38:42    

Reply

Marsh Posté le 09-07-2004 à 18:04:22    

blueteen a écrit :

trouvé sur un forum
 

Code :
  1. 'End - Send an ALT-F4 to Close the Defrag program
  2. WshShell.Sendkeys "%{F4}"



 
 
le truc c que ca m ouvre notepad quand j essaye de le lancer :D

Reply

Sujets relatifs:

Leave a Replay

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