I have a VB6 app that uses API calls to check that status of certain
Services. I am converting this app to VB.Net and wondering how to accomplish
this same functionality in VB.Net.

Any ideas?
--
Thanks,

Scott

Hi,

Dim s As System.ServiceProcess.ServiceController

For Each s In System.ServiceProcess.ServiceController.GetDevices

Dim strOut As String = String.Format("{0} {1} {2}", s.ServiceName, s.Status,
s.ServiceType)

Trace.WriteLine(strOut)

Next



Ken

-----------------------

"SQLScott" <(E-Mail Removed)> wrote in message
newsA5AA71E-6C5D-473E-8399-(E-Mail Removed)...
I have a VB6 app that uses API calls to check that status of certain
Services. I am converting this app to VB.Net and wondering how to
accomplish
this same functionality in VB.Net.

Any ideas?
--
Thanks,

Scott

Thanks Ken. Very helpful. That gave me 99% of what I needed, but I have one
more question.

How can I tell if a service is "hung"? I know I can check the status which
will tell me whether it is running or not, but I need to be able to determine
if the service is responding. Does this make sense?

Thanks so much for your help. Very much appreciated.

Scott

"Ken Tucker [MVP]" wrote:

> Hi,
>
> Dim s As System.ServiceProcess.ServiceController
>
> For Each s In System.ServiceProcess.ServiceController.GetDevices
>
> Dim strOut As String = String.Format("{0} {1} {2}", s.ServiceName, s.Status,
> s.ServiceType)
>
> Trace.WriteLine(strOut)
>
> Next
>
>
>
> Ken
>
> -----------------------
>
> "SQLScott" <(E-Mail Removed)> wrote in message
> newsA5AA71E-6C5D-473E-8399-(E-Mail Removed)...
> I have a VB6 app that uses API calls to check that status of certain
> Services. I am converting this app to VB.Net and wondering how to
> accomplish
> this same functionality in VB.Net.
>
> Any ideas?
> --
> Thanks,
>
> Scott
>
>
>