Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come determinare se un servizio è in esecuzione in Visual Basic

Saper controllare lo stato di un servizio di Microsoft Windows utilizzando Microsoft Visual Basic.NET ( VB.NET ) consente di risparmiare tempo quando si lavora con i servizi . Secondo Microsoft, un servizio che 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 passi , è possibile scrivere un programma VB.NET per trovare lo stato di un servizio . Istruzioni
1

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

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

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

Importazioni System.ServiceProcess

Module Module1

Sub Main ( ) per

Prova

Dim ServiceCtrler As New ServiceController ( "Apple mobile Device " ) per

ServiceCtrler.Status.Equals ( ServiceControllerStatus.Running ) E ServiceCtrler.CanStop Poi

Console.WriteLine ( ServiceCtrler.ServiceName ) per

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

Console.WriteLine (" può mettere in pausa e continuare =" + _

ServiceCtrler.CanPauseAndContinue.ToString ( ) ) per

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

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

End If

Console.ReadLine ( ) per

Catch ex As Exception

Console.WriteLine ( ex.Message ) per

End Try

End Sub End Module


4

modificare la seguente riga di codice e digitare il nome del servizio che si consiglia di utilizzare :

Dim ServiceCtrler As New ServiceController ( " Apple Mobile Device " ) economici 5

Premere " F5 " per eseguire il programma
.

 

Programmazione © www.354353.com