Ayuda con ADSI
 

Buenas,

Estoy realizando una aplicación para interactuar con el Active directory(listar grupos, agregar usuarios a grupos, etc). Mi problema esta en que no logro poder agregar a un grupo un grupo ya existente.
Utilizo ActiveDs_TLB y adshlp.

Muchas gracias por la ayuda de antemano.

Buenas,

Este es el código que estoy intentando utilizar para agregar el grupo.

var
grupo : IAdsGroup;
grup: IAdsGroup;
Rutagrupo: string;
begin
Rutagrupo := 'WinNT://domain/grupodestino';
AdsGetObject(Rutagrupo, IADsGroup, grupo);
grup := dom.GetObject('group', 'grupoagregar') as IAdsGroup;
grupo.Add(grup.ADsPath);
end;

Bienvenido a clubdelphi, como siempre aconsejamos a los nuevos, no olvides leer nuestra guía de estilo, gracias por tu colaboración :)

Y recuerda poner los tags al código fuente, ejemplo:



Gracias :)

Gracias Casimiro por la bienvenida,

He agregado los tag pero no sabia que tenia que marcar el texto, sorry.

No hay problema, por eso eres novato aquí :)

Solucionado
 

Buenas,

Para alguien que le pueda interesar la solución. El código esta bien el tema esta en el ámbito del grupo en el Active Directory.

1- No se puede agregar a un grupo con ámbito global otro grupo del mismo ámbito.
2- Se puede agregar un grupo de ámbito global a un grupo con ámbito de dominio local.
3- Se puede agregar a un grupo de ámbito de dominio local otro grupo del mismo ámbito.

Estas restricciones son a nivel de IADsGroup, desde las herramientas de administración de AD esto puede variar.

Un saludo.