Pessoal bom dia.
Tenho um script para deletar os usuarios do Grupo Admin e deixando apenas os usuarios
Administrator, Domain Admins e o meu grupo de suporte MDB_IT
Acontece que em algumas maquinas com XP e Windows 7 funciona, porem em outra com windows 7 também
ocorre o erro 80070005 e não executa.
As maquinas tem os mesmos patchs aplicados e estão no mesmo container onde aplico a GPO com o startup script.
Este é o Script,
Option Explicit
Dim network, group, user
Set network = CreateObject("WScript.Network")
Set group = GetObject("WinNT://" & network.ComputerName & "/Administradores,group")
For Each user In group.members
If UCase(user.name) <> "Administrator" And UCase(user.name) <> "Domain Admins" And UCase(user.name) <> "MDB_IT" Then
group.remove user.adspath
End If
Next
Alguma ajuda ai por favor.
Obrigado.
Tenho um script para deletar os usuarios do Grupo Admin e deixando apenas os usuarios
Administrator, Domain Admins e o meu grupo de suporte MDB_IT
Acontece que em algumas maquinas com XP e Windows 7 funciona, porem em outra com windows 7 também
ocorre o erro 80070005 e não executa.
As maquinas tem os mesmos patchs aplicados e estão no mesmo container onde aplico a GPO com o startup script.
Este é o Script,
Option Explicit
Dim network, group, user
Set network = CreateObject("WScript.Network")
Set group = GetObject("WinNT://" & network.ComputerName & "/Administradores,group")
For Each user In group.members
If UCase(user.name) <> "Administrator" And UCase(user.name) <> "Domain Admins" And UCase(user.name) <> "MDB_IT" Then
group.remove user.adspath
End If
Next
Alguma ajuda ai por favor.
Obrigado.






