deshabilitar una maquina en un dominio 2003 server

[javi37]

Hola

Con este código puede habilitar (o deshablitar, cambiando el false por true) una cuenta de usuario

Código:

Dim objUser As Object = GetObject("WinNT://SRV_CDW/" & Me.TextBox1.Text.Trim & ",user")
        objUser.AccountDisabled = False
        objUser.SetInfo()

Lo que necesito es algo parecido, es deshabilitar una maquina, no un usuario, y no sacarla del dominio.

Alguna sugerencia de como hacerlo?

muchas gracias

[javi37]

me respondo yo mismo

Dim obj As Object = GetObject("LDAP://cn=" & maquina & ",OU=ESTACIONES,OU=AR2,OU=AR1,DC=MIO,DC=ES")
obj.AccountDisabled = True
obj.SetInfo()