Page 1 sur 1
Fonction Démarrage de service windows ( NET START)
Publié : mar. 26/janv./2010 10:26
par Stefou
Salut à tous,
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
Re: Fonction Démarrage de service windows ( NET START)
Publié : mar. 26/janv./2010 10:56
par Backup
Merci
ps: prends l'habitude de mettre ton pseudo dans tes procedures
comme ça plus tard on sait a qui on la doit
j'ai fait la modif sur ton message
Merci encore
Re: Fonction Démarrage de service windows ( NET START)
Publié : mar. 26/janv./2010 10:59
par flaith
Stefou a écrit :Salut à tous,
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","START "+Chr(34)+nom$+Chr(34),"c:\WINDOWS\system32\",#PB_Program_Wait | #PB_Program_Hide )
EndProcedure
Merci pour ce bout de code, petite modif :
Code : Tout sélectionner
RunProgram("c:\WINDOWS\system32\net.exe",option$+Chr(34)+nom$+Chr(34),"c:\WINDOWS\system32\",#PB_Program_Wait | #PB_Program_Hide )
Re: Fonction Démarrage de service windows ( NET START)
Publié : mar. 26/janv./2010 11:25
par Progi1984
Un petit article que j'ai réalisé sur les services Windows :
http://f-lefevre.developpez.com/tutorie ... e-windows/
Re: Fonction Démarrage de service windows ( NET START)
Publié : mar. 26/janv./2010 17:18
par Stefou
Merci pour ce bout de code, petite modif :
Code:
RunProgram("c:\WINDOWS\system32\net.exe",option$+Chr(34)+nom$+Chr(34),"c:\WINDOWS\system32\",#PB_Program_Wait | #PB_Program_Hide )
Au le nul que je suis
J'avoue j'ai posté cela à l'arrache...mais tout de même (je corrige le premier post)
Merci
Re: Fonction Démarrage de service windows ( NET START)
Publié : mer. 27/janv./2010 11:27
par gnozal
Petite remarque :
ne jamais utiliser des chemins de fichiers 'en dur', surtout pour les répertoires systèmes.
Par exemple, rien ne garantit que ''c:\WINDOWS\" est le chemin de Windows sur toutes les machines. Chez moi, c'est 'c:\WinNT\' par exemple.
Il vaut mieux utiliser les API spécifiques pour trouver les répertoires systèmes (avec les identifiants
CSIDL), ou dans ce cas particulier
GetWindowsDirectory_() ou
GetSystemDirectory_() ou des variables d'environnement du genre %windir%.