这个问题我已经解决!
在.Net中提供了"System.ServiceProcess.ServiceController" Namespace.
只要我们利用这个就可以解决了。
例如:
Dim sc As New System.ServiceProcess.ServiceController
‘这里ServiceName必须写对!
sc.ServiceName = "ColdFusion MX Application Server"
MessageBox.Show(sc.Status.ToString)
'sc.Stop()
Dim scStatus As String
'Status = sc.Status
'MessageBox.Show(Status.ToString)
If sc.Status.Equals(ServiceControllerStatus.Stopped) Then
sc.Start()
scStatus = sc.Status()
MessageBox.Show(scStatus.ToString)
Else
sc.Stop()
scStatus = sc.Status()
MessageBox.Show(scStatus.ToString)
End If