-----Original Message-----
Joshua-
Download Scriptomatic from MS. There are some sample scripts that you can
use to create a utility to do this job. Here is one that will give you the
info you need. It is from the Scriptomatic. This is more than you need but
you can start with this one. Save it as a .vbs and run it from the command
prompt using cscript filename.vbs.
---
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Service",,48)
For Each objItem in colItems
Wscript.Echo "AcceptPause: " & objItem.AcceptPause
Wscript.Echo "AcceptStop: " & objItem.AcceptStop
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CheckPoint: " & objItem.CheckPoint
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DesktopInteract: " & objItem.DesktopInteract
Wscript.Echo "DisplayName: " & objItem.DisplayName
Wscript.Echo "ErrorControl: " & objItem.ErrorControl
Wscript.Echo "ExitCode: " & objItem.ExitCode
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PathName: " & objItem.PathName
Wscript.Echo "ProcessId: " & objItem.ProcessId
Wscript.Echo "ServiceSpecificExitCode: " &
objItem.ServiceSpecificExitCode
Wscript.Echo "ServiceType: " & objItem.ServiceType
Wscript.Echo "Started: " & objItem.Started
Wscript.Echo "StartMode: " & objItem.StartMode
Wscript.Echo "StartName: " & objItem.StartName
Wscript.Echo "State: " & objItem.State
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SystemCreationClassName: " &
objItem.SystemCreationClassName
Wscript.Echo "SystemName: " & objItem.SystemName
Wscript.Echo "TagId: " & objItem.TagId
Wscript.Echo "WaitHint: " & objItem.WaitHint
Next
===================
BS
.