Detect alternative RMM solutions with a script

To identify potential business opportunities, check if your clients use an alternative RMM solution.. The following VBScript checks for indicators of alternative RMM agents. It generates a failure if any are detected.

  1. Copy the script into a file with a .vbs extension.
  2. Add it to the All Devices view.
  3. Deploy it as a Script Check or Automated Task.

If you add the script as a Script Check, use a 24x7 check so it does not appear in client-facing reports.

rmm_discovery.vbs

On Error Resume Next

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * from Win32_Service",,48)

CompCnt=0

For each objItem in colItems

 'Labtech Check

 If (objItem.Name = "LTService") Then

         CompCnt = CompCnt+1

         If (objItem.Started = "False") Then

                 Wscript.Echo "Labtech instance found and service is not running!"

         Else

                 Wscript.Echo "Labtech instance found and service is running!"

         End If

 End If

 'N-Able Check

 If (objItem.Name = "Windows Agent Service") Then

         CompCnt = CompCnt+1

         If (objItem.Started = "False") Then

                 Wscript.Echo "N-Able  instance found and service is not running!"

         Else

                 Wscript.Echo "N-Able instance found and service is running!"

         End If

 End If

 'Kaseya Check

 If (objItem.DisplayName = "Kaseya Agent") Then

         CompCnt = CompCnt+1

         If (objItem.Started = "False") Then

                 Wscript.Echo "Kaseya instance found and service is not running!"

         Else

                 Wscript.Echo "Kaseya instance found and service is running!"

         End If

 End If

 'AVG/Level Platforms Check

 If (objItem.DisplayName = "MWExpertSystem") Then

         CompCnt = CompCnt+1

         If (objItem.Started = "False") Then

                 Wscript.Echo "AVG/LPI instance found and service is not running!"

         Else

                 Wscript.Echo "AVG/LPI instance found and service is running!"

         End If

 End If

 'Continuum Check

 If (objItem.DisplayName = "SAAZServerPlus") Then

         CompCnt = CompCnt+1

         If (objItem.Started = "False") Then

                 Wscript.Echo "Continuum Instance found and service is not running!"

         Else

                 Wscript.Echo "Continuum Instance found and service is running!"

         End If

 End If                

Next

If (CompCnt = 0) Then

 Wscript.Echo "No Alternative RMM Agents Detected"

 wscript.Quit(0)

Else

 wscript.Quit(1001)

End If