Come determinare se un servizio è in esecuzione in Visual Basic

November 10

Come determinare se un servizio è in esecuzione in Visual Basic


Sapere come controllare lo stato di un servizio di Microsoft Windows utilizzando Microsoft Visual Basic.NET (VB.NET) può risparmiare tempo quando si lavora con i servizi. Secondo Microsoft, il servizio consente di creare applicazioni eseguibili che vengono eseguiti nelle proprie sessioni di Windows. VB.NET è un linguaggio di programmazione orientato agli oggetti che viene comunemente utilizzato dai programmatori per la sua facilità d'uso. In pochi passaggi, è possibile scrivere un programma VB.NET per trovare lo stato di un servizio.

istruzione

1 Avviare Microsoft Visual Basic Express e fare clic su "Nuovo progetto ..." nel riquadro a sinistra dello schermo. Fare doppio clic su "Applicazione console."

2 Fare clic sul menu "Progetto" e selezionare "<nomeprogetto> Proprietà". Fai clic su "Riferimenti" e quindi selezionare "Aggiungi". Selezionare "NET" e poi cliccare su "System.ServiceProcess." Fai clic su "OK". Premere il tasto "Ctrl" e "A" e quindi premere "Elimina" per rimuovere il codice esistente.

3 Copia e incolla il seguente codice al modulo "Module1.vb". Questo codice determina lo stato del servizio "Apple Mobile Device":

Le importazioni System.ServiceProcess

Module Module1

Sub Main()

Provare

Dim ServiceCtrler come nuovo ServiceController ( "Apple Mobile Device")

Se ServiceCtrler.Status.Equals (ServiceControllerStatus.Running) e ServiceCtrler.CanStop Poi

Console.WriteLine (ServiceCtrler.ServiceName)

Console.WriteLine ( "Stato =" + ServiceCtrler.Status.ToString ())

Console.WriteLine ( "possibile mettere in pausa e continua =" + _

ServiceCtrler.CanPauseAndContinue.ToString ())

Console.WriteLine ( "può spegnere =" + ServiceCtrler.CanShutdown.ToString ())

Console.WriteLine ( "Can Stop =" + ServiceCtrler.CanStop.ToString ())

Finisci se

Console.ReadLine ()

Fermo ex come eccezione

Console.WriteLine (ex.Message)

End Try

End Sub

Modulo fine

4 Modificare la seguente riga di codice e digitare il nome del servizio che si desidera utilizzare:

Dim ServiceCtrler come nuovo ServiceController ( "Apple Mobile Device")

5 Premere il tasto "F5" per eseguire il programma.