Conocer los miembros de un grupo del Directorio Activo....

03/02/2005 - 09:21 por Sergio Sánchez Trujillo | Informe spam
Hola,

Me gustaría saber si existe algún método para que un usuario desde sus
estación de trabajo pueda conocer los miembros que forman parte de los grupos
existentes en el directorio activo. Ya sea mediante linea de comandos o bien
mediante el interfaz de windows.
Estos usuarios en concreto no tienen ningún tipo de permiso para acceder al
controlador del dominio y poder ver esa información (y nunca lo tendrán :) ).

Un saludo.

Sergio Sánchez

Preguntas similare

Leer las respuestas

#1 Sergio Sánchez Trujillo
03/02/2005 - 11:55 | Informe spam
Muchas gracias Fernando,

una cosilla, tengo un dominio en w2000 (aunqeu en modo mixto) ¿tengo que
modificar el script en la linea que llama a la función
GetObject("WinNT://...) ?

Saludos,

Sergio Sánchez

"Fernando Reyes [MS MVP]" escribió:

Con este script de VBScript cualquier usuario del dominio puede conocer esa información. Copia todo lo que está entre <pego> y </pego> en el bloc de notas y guárdalo con extensión .vbs. Deberás cambiar "midominio" por el nombre NetBios de tu dominio. Para ejecutarlo lo lanzas desde línea de comandos con "cscript nombre_de_script.vbs":

<pego>
'Este script enumera los usuarios que pertenecen a cada
'uno de los grupos del dominio
'© Fernando Reyes [MS MVP]

'Creamos un objeto que contiene el dominio
Set obj_Dominio = GetObject("WinNT://midominio,Domain")

'Filtramos los objetos del dominio para obtener los grupos
obj_Dominio.Filter = Array("Group")

'Recorremos cada grupo uno a uno
For Each obj_Nombre_Grupo In obj_Dominio

'Sacamos por pantalla el nombre del grupo actual
Wscript.Echo obj_Nombre_Grupo.Name

'Creamos un objeto qie contiene al grupo actual
Set obj_Grupo = GetObject("WinNT://midominio/" & _
obj_Nombre_Grupo.Name & ",Group")

'Filtramos los objetos del grupo para obtener los
'usuarios miembros de él
obj_Grupo.members.Filter = Array("User")

'Recorremos los usuarios de uno en uno
For Each obj_Nombre_Usuario In obj_Grupo.members
'Sacamos por pantalla el nombre del usario
Wscript.Echo "" & obj_Nombre_Usuario.name
Next
Next
<pego>

Un saludo
Fernando Reyes [MS MVP]
MCSE Windows 2000
MCSA Windows Server 2003

(Comete dos mandarinas si quieres escribirme)


Fue Sergio Sánchez Trujillo () el que, con sus deditos, escribió:

> Hola,
>
> Me gustaría saber si existe algún método para que un usuario desde sus
> estación de trabajo pueda conocer los miembros que forman parte de
> los grupos existentes en el directorio activo. Ya sea mediante linea
> de comandos o bien mediante el interfaz de windows.
> Estos usuarios en concreto no tienen ningún tipo de permiso para
> acceder al controlador del dominio y poder ver esa información (y
> nunca lo tendrán :) ).
>
> Un saludo.
>
> Sergio Sánchez
Respuesta Responder a este mensaje
#2 Sergio Sánchez Trujillo
03/02/2005 - 11:59 | Informe spam
Ya lo he arreglado Fernando, muchísimas gracias.



"Fernando Reyes [MS MVP]" escribió:

Con este script de VBScript cualquier usuario del dominio puede conocer esa información. Copia todo lo que está entre <pego> y </pego> en el bloc de notas y guárdalo con extensión .vbs. Deberás cambiar "midominio" por el nombre NetBios de tu dominio. Para ejecutarlo lo lanzas desde línea de comandos con "cscript nombre_de_script.vbs":

<pego>
'Este script enumera los usuarios que pertenecen a cada
'uno de los grupos del dominio
'© Fernando Reyes [MS MVP]

'Creamos un objeto que contiene el dominio
Set obj_Dominio = GetObject("WinNT://midominio,Domain")

'Filtramos los objetos del dominio para obtener los grupos
obj_Dominio.Filter = Array("Group")

'Recorremos cada grupo uno a uno
For Each obj_Nombre_Grupo In obj_Dominio

'Sacamos por pantalla el nombre del grupo actual
Wscript.Echo obj_Nombre_Grupo.Name

'Creamos un objeto qie contiene al grupo actual
Set obj_Grupo = GetObject("WinNT://midominio/" & _
obj_Nombre_Grupo.Name & ",Group")

'Filtramos los objetos del grupo para obtener los
'usuarios miembros de él
obj_Grupo.members.Filter = Array("User")

'Recorremos los usuarios de uno en uno
For Each obj_Nombre_Usuario In obj_Grupo.members
'Sacamos por pantalla el nombre del usario
Wscript.Echo "" & obj_Nombre_Usuario.name
Next
Next
<pego>

Un saludo
Fernando Reyes [MS MVP]
MCSE Windows 2000
MCSA Windows Server 2003

(Comete dos mandarinas si quieres escribirme)


Fue Sergio Sánchez Trujillo () el que, con sus deditos, escribió:

> Hola,
>
> Me gustaría saber si existe algún método para que un usuario desde sus
> estación de trabajo pueda conocer los miembros que forman parte de
> los grupos existentes en el directorio activo. Ya sea mediante linea
> de comandos o bien mediante el interfaz de windows.
> Estos usuarios en concreto no tienen ningún tipo de permiso para
> acceder al controlador del dominio y poder ver esa información (y
> nunca lo tendrán :) ).
>
> Un saludo.
>
> Sergio Sánchez
Respuesta Responder a este mensaje
#3 Fernando Reyes [MS MVP]
03/02/2005 - 12:02 | Informe spam
No, te funcionará igual incluso en un dominio Windows 2003 nativo 2003.

Un saludo
Fernando Reyes [MS MVP]
MCSE Windows 2000
MCSA Windows Server 2003

(Cómete un par de almejas para escribirme)


Fue Sergio Sánchez Trujillo ()
el que, con sus deditos, escribió:

Muchas gracias Fernando,

una cosilla, tengo un dominio en w2000 (aunqeu en modo mixto) ¿tengo
que
modificar el script en la linea que llama a la función
GetObject("WinNT://...) ?

Saludos,

Sergio Sánchez

"Fernando Reyes [MS MVP]" escribió:

Con este script de VBScript cualquier usuario del dominio puede
conocer esa información. Copia todo lo que está entre <pego> y
</pego> en el bloc de notas y guárdalo con extensión .vbs. Deberás
cambiar "midominio" por el nombre NetBios de tu dominio. Para
ejecutarlo lo lanzas desde línea de comandos con "cscript
nombre_de_script.vbs":

<pego>
'Este script enumera los usuarios que pertenecen a cada
'uno de los grupos del dominio
'© Fernando Reyes [MS MVP]

'Creamos un objeto que contiene el dominio
Set obj_Dominio = GetObject("WinNT://midominio,Domain")

'Filtramos los objetos del dominio para obtener los grupos
obj_Dominio.Filter = Array("Group")

'Recorremos cada grupo uno a uno
For Each obj_Nombre_Grupo In obj_Dominio

'Sacamos por pantalla el nombre del grupo actual
Wscript.Echo obj_Nombre_Grupo.Name

'Creamos un objeto qie contiene al grupo actual
Set obj_Grupo = GetObject("WinNT://midominio/" & _
obj_Nombre_Grupo.Name & ",Group")

'Filtramos los objetos del grupo para obtener los
'usuarios miembros de él
obj_Grupo.members.Filter = Array("User")

'Recorremos los usuarios de uno en uno
For Each obj_Nombre_Usuario In obj_Grupo.members
'Sacamos por pantalla el nombre del usario
Wscript.Echo "" & obj_Nombre_Usuario.name
Next
Next
<pego>

Un saludo
Fernando Reyes [MS MVP]
MCSE Windows 2000
MCSA Windows Server 2003

(Comete dos mandarinas si quieres escribirme)


Fue Sergio Sánchez Trujillo
() el que, con sus
deditos, escribió:

Hola,

Me gustaría saber si existe algún método para que un usuario desde
sus
estación de trabajo pueda conocer los miembros que forman parte de
los grupos existentes en el directorio activo. Ya sea mediante linea
de comandos o bien mediante el interfaz de windows.
Estos usuarios en concreto no tienen ningún tipo de permiso para
acceder al controlador del dominio y poder ver esa información (y
nunca lo tendrán :) ).

Un saludo.

Sergio Sánchez
Respuesta Responder a este mensaje
#4 Alejandro A. Ponicke
04/02/2005 - 06:27 | Informe spam
net group "nombre del grupo" /domain


Alejandro A. Ponicke
MCSA-MCSE-MCT-MVP
Buenos Aires-Argentina

"Sergio Sánchez Trujillo"
wrote in message news:
Hola,

Me gustaría saber si existe algún método para que un usuario desde sus
estación de trabajo pueda conocer los miembros que forman parte de los
grupos
existentes en el directorio activo. Ya sea mediante linea de comandos o
bien
mediante el interfaz de windows.
Estos usuarios en concreto no tienen ningún tipo de permiso para acceder
al
controlador del dominio y poder ver esa información (y nunca lo tendrán
:) ).

Un saludo.

Sergio Sánchez
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida