محمد آشتیانی
شنبه 17 اسفند 1392, 16:15 عصر
سلام
اول باید رفرنس System.ServiceProcess رو اضافه کنی
بعدش هم این میتونی از این کلاسی که میزارم استفاده کنی ، فقط کافیه اسم سرویس مورد نظرت رو به صورت پارامتر بفرستی
Imports System.ServiceProcess
Public Class MyServiceController
Inherits System.ServiceProcess.ServiceBase
Public MyService As ServiceController
''' <summary>
''' Status Codes: 1-Started 2-Stopped 3-Unknown State
''' </summary>
''' <param name="MyServiceName"></param>
''' <returns></returns>
''' <remarks></remarks>
Public Function ServiceStatus(ByVal MyServiceName) As String
MyService = New ServiceController(MyServiceName)
Threading.Thread.Sleep(100)
Try
If MyService.Status = ServiceControllerStatus.Running Then
ServiceStatus = "Run"
ElseIf MyService.Status = ServiceControllerStatus.Stopped Then
ServiceStatus = "Stop"
Else
ServiceStatus = "Unknown"
End If
Catch ex As Exception
ServiceStatus = "Unknown"
End Try
End Function
Public Sub StartService(ByVal MyServiceName As String)
MyService = New ServiceController(MyServiceName)
Try
MyService.Start()
Catch exp As Exception
'راه اندازی سرویس امکانپذیر نیست
End Try
End Sub
Public Sub StopService(ByVal MyServiceName As String)
MyService = New ServiceController(MyServiceName)
Try
MyService.Stop()
Catch exp As Exception
'توقف سرویس امکانپذیر نیست
End Try
End Sub
End Class