Un petit passage pour poster un truc que j'avais besoin. Il s'agit de pouvoir activer des services.
J'aime bien que windows soit le plus léger possible au démarrage, mais certain service me serve 3-4 fois par ans.
Cette fonction permet d'activer un service.
a+
Code : Tout sélectionner
Procedure WindowService(nom$,etat=1)
; de Stefou
Select etat
Case 1
option$="START "
Case 0
option$="STOP "
Case 2
option$="PAUSE "
Case 3
option$="CONTINUE "
EndSelect
RunProgram("c:\WINDOWS\system32\net.exe",option$+Chr(34)+nom$+Chr(34),"c:\WINDOWS\system32\",#PB_Program_Wait | #PB_Program_Hide )
EndProcedure