Arquivos com WMI e CIM_DataFile: Como apagar arquivos em outro computador com 3 linhas de código

Aqui vai uma forma super simples de procurar um arquivo em um computador remoto e apagá-lo. Isso mostra como o WMI é flexível e pode resolver problemas rápidos do dia-a-dia de qualquer administrador:

pc = "webserver"
Set refFile = GetObject("winMgmts://" & pc  & "/CIM_DataFile.Name='k:\BOOTEX.LOG'")
refFile.delete

Basta salvar como VBS e trocar a variável pc. Simples, não?

Obviamente, esse é só um exemplo... a idéia seria colocar isso dentro de um If pra testar se o arquivo existe, um loop pra executar em vários computadores, um log de erros/atividades... mas essa parte é fácil.

Até mais!

Vinicius

Categorias dessa postagem:

Comentários

bispo.flavio : Bom dia Vinicius,

Goataria de ver com você se já existe um script que instale uma impressora quando o usuario fizer login na rede.

Obrigado

Flavio Bispo
bispo.flavio@gmail.com [30/4/07 11:36 - link]

Vinicius Canto : Olá,

tem sim. Já verificou aqui?
http://www.microsoft.com/technet/scriptcenter/scripts/default.mspx?mfr=true
[]s,

Vinicius Canto scripterbr_at_gmail_dot_com
MVP Visual Developer - Scripting
MCP Windows 2000 Server, Windows XP e SQL Server 2000
Blog sobre scripting: http://viniciuscanto.blogspot.com [30/4/07 17:38 - link]