Artigos do Blog

Área destinada a publicação dos artigos.


Marcelo Montezuma - Rio de Janeiro - Brasil

sábado, 25 de outubro de 2008

Scripts - Serviços - Deleta Serviço

Deleta serviço do Windows.

O script a seguir pode deletar um serviço do Windows de forma simples e rápida, bastando somente algumas alterações no script conforme necessário.

Instruções para utilização do script.

Abra o bloco de notas do Windows, selecione o código entre o "Início do código" e o "Fim do código", copie e cole no bloco de notas e em seguida salve o arquivo como .vbs

Edite o arquivo e altere as informações escritas em vermelho.

'**Inicio do Código***************************************************************

'Título = Deleta um serviço do Windows
'Pagina = SUPORTE & SCRIPTS - scriptonita.blogspot.com
'versão = Beta 1.0
'Contato = Marcelo Montezuma - marcelo.montezuma@gmail.com
'--------------------------------------------------------------------------------
'Nota:
'O usuario deve possuir privilégios administrativos na estação.
'O script deve ser ajustado de acordo com sua finalidade.

'Inicio'--------------------------------------------------------------------------------
'Variaveis e Costantes '--------------------------------------------------------------------------------
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colListOfServices = objWMIService.ExecQuery _
("Select * from Win32_Service Where Name = 'Teste_Service'")

For Each objService in colListOfServices
objService.StopService()
objService.Delete()
Next

WScript.Echo "Concluído"

**Fim do código****************************************************************

Ass. Marcelo Montezuma

Seja o primeiro a comentar

  ©Template Blogger Elegance by Dicas Blogger.

TOPO