1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
| Public Sub New()
MyBase.New()
'Cet appel est requis par le Concepteur de composants.
InitializeComponent()
'Ajoutez le code d'initialisation après l'appel de InitializeComponent
' Compte utilisé par le service pour s'executer, ici le compte Système Local disposant de
' privilèges importants.
ServiceProcessInstaller1.Account = ServiceProcess.ServiceAccount.LocalSystem
' Description du service
ServiceInstaller1.Description = "Service d'inventaire des PC's"
' Nom complet du service
ServiceInstaller1.DisplayName = "Service_Inventaire"
' Nom du service, utilisé en interne par Windows
ServiceInstaller1.ServiceName = "Service_Inventaire"
' Mode de démarrage du service, ici mode manuel
ServiceInstaller1.StartType = ServiceProcess.ServiceStartMode.Automatic
End Sub |
Partager