![]()
Identify Computer Roles Using Services
Description
Indicates whether SQL Server is running on a computer.Script Code
strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colServices = objWMIService.ExecQuery _ ("Select * from Win32_Service Where Name = 'MSSQLServer'") If colServices.Count > 0 Then For Each objService in colServices Wscript.Echo "SQL Server is " & objService.State & "." Next Else Wscript.Echo "SQL Server is not installed on this computer." End If
The System Administration Scripting Guide, part of the Windows .NET Server Resource Kit. For more information, contact scripter@microsoft.com.