| When the application starts or is going to
be doing lots of access with Groove using GWS you may want to confirm that
Groove is actually running. This function will test to confirm that
Groove.exe is running and returns true if it running and will return false
otherwise. Then your application can take the appropriate next steps.
Friend Function IsGrooveRunning() As Boolean
'This will test to see if Groove is running
Dim allProcesses(), thisProcess As Process
allProcesses = System.Diagnostics.Process.GetProcesses
IsGrooveRunning = False
For Each thisProcess In allProcesses
'Find a process named Groove
If thisProcess.ProcessName = "Groove" Then
Return True
End If
Next
End Function |
|