Liste aller Dienste ermitteln (VB.NET) Über die ServiceController-Klasse lässt sich eine Liste aller Dienste einschließlich des jeweiligen Status (Running, Stopped) schnell ermitteln.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  12.748
https://www.tools4vb.com	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 4 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.5 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Für eine Liste aller installierten Dienste kann man unter VB.NET auf die ServiceController-Klasse aus dem Namensraum "System.ServiceProcess" zurückgreifen. Die entsprechende DLL muss jedoch zunächst über "Projekt - Verweise" dem Projekt hinzugefügt werden.

Nachfolgendes Beispiel listet alle installierten Dienste mit dem jeweiligen Status auf (Running, Stopped, etc.) und zeigt diese in einer ListBox an.

Imports System.ServiceProcess
 
Public Class Form1
  Inherits System.Windows.Forms.Form
 
  Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
 
    ' Liste aller Dienste erstellen mit jeweiligem Status 
    ' in  die ListBox eintragen
    Dim oService As ServiceController
 
    For Each oService In ServiceController.GetServices()
      With oService
        ListBox1.Items.Add(.ServiceName & " = " & .Status.ToString)
      End With
    Next
  End Sub
End Class