Stop a service through it's own code

[MikeHildner]

I'm trying to build into my service some license checking, and stop the service if the license is invalid. Calling this method in OnStart():

   Private Sub CheckLicense()
           EventLog1.WriteEntry("Your license has expired. Please contact support to obtain a new license.", EventLogEntryType.Error)
           'Application.Exit()
           'OnStop()
           'Me.Dispose(True)
           Dim serv As New System.ServiceProcess.ServiceController("My Service Name")
           serv.Stop()
   End Sub

 

None of my attempts - Application.Exit, calling OnStop, Me.Dispose and using a ServiceController seem to work. Anyone know how my service can stop itself?

 

Thanks,

Mike

[MikeHildner]

After a bunch of googling, I've found out that apparently, it's just not possible to do this. The only work-around I've found is to spawn another process that uses a ServiceController to stop your service.

[Merrion]

If you do a sleep(10000) in the OnStart() sub if the license is not present then it will time out and stop itself.

[Arch4ngel]

Well... that's a work around... but it's plainfully ugly. Admit it ! :p lollll

[MikeHildner]

Thanks Merrion, that does work. Maybe not too pretty as Arch4ngel said, but it does the job.