Rubrik: System/Windows · Prozesse/Tasks | VB-Versionen: VB.NET | 28.02.07 |
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: | Views: 12.042 |
www.tools4vb.de | System: WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
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