Показать сообщение отдельно
Старый 29.09.2006, 03:55   #3
STTR
Постоялец
 
Аватар для STTR
 
Пол:Мужской
Регистрация: 28.11.2005
Сообщений: 207
Репутация: 130
По умолчанию Re: Как удалить службу из Windows

Если имеется ввиду удаление службы, то так:

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
__________________
У шамана три руки
Мир вокруг, как темный зал
На ладонях золотых
Нарисованы глаза (C) Пикник.
STTR вне форума
 
Ответить с цитированием Вверх
 
Время генерации страницы 0.07713 секунды с 9 запросами