Boa tarde,
Fiz um script para alterar o nome do computador via AD.
o Script é este.
Const Pwd = "password"
Const Username = "administrador"
Set wmi = GetObject("Winmgmts:root\cimv2")
For Each objComputer in wmi.InstancesOf("Win32_ComputerSystem")
erro = objComputer.rename(NewNomePC,Password,User)
If erro <> 0 Then
LogNumber = 1
WScript.Echo (Now & " Não foi possivel trocar o nome do Terminal...")
Else
WScript.Echo (Now & " Troca de Nome de Terminal Feita.. Reiniciar... s.f.f.")
End If
Next
Esta a funcionar perfeitamente no Windows Xp, já no windows 200 não esta a funcionar. Sabem indicar me outra forma de mudar o nome do computador que funione no w2k.
Obrigado desde já
