'保存以下代码为DeleteService.vbs,把里面的那个服务名也改成你要删除的服务名,双击就可以了,这个适合与程序化实现。
strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colListOfServices = objWMIService.ExecQuery("Select * from Win32_Service Where Name = '服务名'")
For Each objService in colListOfServices
objService.StopService()
objService.Delete()
Next