[R] Stopper et désactiver un service

[shaq]

Bonjour,

Je souhaiterais faire un script qui stop et désactive un service. En l'occurrence le service RemoteAccess.

Mais j'aimerais le faire avec des "commandes" autoit et pas avec netstart ou netstop. Et ce, en vérifiant au préalable si il est activé ou non.

Avez-vous une idée ?

Merci.

[Yogui]

il existe un include Services.au3

Code : Tout sélectionner

;*******************************************************************************
;
;   Function List
;         _Service_Create()
;         _Service_Delete()
;         _Service_EnumAnticede()
;         _Service_EnumDepends()
;         _Service_Exists()
;         _Service_GetDescription()
;         _Service_GetDetails()
;         _Service_GetFilePath()
;         _Service_GetPid()
;         _Service_GetStartMode()
;         _Service_GetState()
;         _Service_Pause()
;         _Service_PauseOK()
;         _Service_Resume()
;         _Service_Running()
;         _Service_SetStartMode()
;         _Service_Start()
;         _Service_StartType()
;         _Service_Stop()
;         _Service_StopOK()
;         _Services_GetDetails()
;         _Services_List_FromPID()
;         _Services_ListInstalled()
;         _Services_ListRunning()
;
;*******************************************************************************

il se télécharge ici : http://www.autoitscript.com/forum/topic ... vices-udf/
Je pense que vous trouverez votre bonheur

[shaq]

Effectivement c'est bien pratique.

Par contre lorsqu'un service est démarré et que je fais un _Service_Stop("service") le service se stop bien, mais le script continu à tourner indéfiniment.

Comment ça se fait ?

Merci.

[Jerome]

Coucou,


Possibilité d'avoir le code ?

Comment voulez - vous de l'aide si vous ne fournissez pas le script ?




Jérôme

[shaq]

Code : Tout sélectionner

#include <Services.au3> ; fichier à Télécharger et à rajouter dans le répetoire include de Autoit

$svc = "RemoteAccess"
$svc_mode = _Service_GetStartMode($svc) ; renvoi le mode (activé ou désactivé)
$svc_status = _Service_GetState($svc) ; renvoi le status (running, stopped ...)

If $svc_mode = "Auto" Then
    _Service_SetStartMode($svc, "Disabled") ; si le mode est Automatique alors on le met en désactivé
EndIf

If $svc_status = "Running" Then
    $result = _Service_StopOK($svc)
    If $result = "True" Then            ; si le status du processus est démarré alors
    _Service_Stop($svc)         ; on vérifie si il est stoppable, si c'est le cas on l'arrête
    EndIf
EndIf
 

Le code je vous l'ai déjà donné en fait. Le seul truc qui bloque c'est : _Service_Stop($svc)

edit : j'ai modifié le Services.au3 => pour mettre dans ProcessWaitClose un timer de 10s masi bon ... C'est pas une solution quoi .

[Jerome]

Coucou,


Perso j'utilise cet include.



Jérôme

[shaq]

Merci chef

je vais essayé ça.

[Yogui]

► Afficher le texte

Code : Tout sélectionner

#include <Services.au3> ; fichier à Télécharger et à rajouter dans le répetoire include de Autoit

$svc = "RemoteAccess"
$svc_mode = _Service_GetStartMode($svc) ; renvoi le mode (activé ou désactivé)
$svc_status = _Service_GetState($svc) ; renvoi le status (running, stopped ...)

If $svc_mode = "Auto" Then
    _Service_SetStartMode($svc, "Disabled") ; si le mode est Automatique alors on le met en désactivé
EndIf

If $svc_status = "Running" Then
    $result = _Service_StopOK($svc)
    If $result = "True" Then            ; si le status du processus est démarré alors
    _Service_Stop($svc)         ; on vérifie si il est stoppable, si c'est le cas on l'arrête
    EndIf
EndIf
 

Le code je vous l'ai déjà donné en fait. Le seul truc qui bloque c'est : _Service_Stop($svc)

edit : j'ai modifié le Services.au3 => pour mettre dans ProcessWaitClose un timer de 10s masi bon ... C'est pas une solution quoi .

J'ai testé votre code je n'ai aucun problème

[shaq]

Effectivement avec le Service.au3 que m'a conseillé Jérôme je n'ai plus ce problème ....

Par contre petite question : Ce script s'exécutera à l'ouverture de session de l'AD. Mais il le fait avec le compte de l'utilisateur qui se logue, comme faire dans l'AD pour lui dire qu'il s'exécute en Admin ?

[Jerome]

Coucou,


Ce que moi je ferais, c'est que ce script soit appelé par un autre via AD en utilisant la fonction AutoIt "RunAs".


PS : Ou sinon du coté de RequireAdmin, mais pas sur de ceci.






Jérôme

[SrBelial]

si jamais des problèmes persistent, il pourrait être intéressant de simplifier le fonctionnement de votre script,
en utilisant par exemple directement les commandes CMD permettant de manipuler les services !
(http://www.commentcamarche.net/faq/2739 ... e-commande)
appelez les via un ShellExecute par exemple ...

[shaq]

Je met le poste en résolu.

Avec le Services.au3 de Jérôme je n'ai plus ce problème de fonctionne qui tourne en boucle.
Pour l'exécuter en Admin j'ai effectivement fait un script en AutoIt qui lance celui-ci avec un RunAs.

Merci encore

[Jerome]

N'oubliez pas la balise [R] dans le titre de votre premier message si votre sujet est résolu.