Agregar grupos a un grupo (Active directory)
Publicado por Raudel (2 intervenciones) el 02/12/2016 12:30:31
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.
Este es el código que estoy intentando utilizar para agregar el grupo.
Al ejecutar el código me lanza un mensaje que dice "No se ha encontrado el nombre de usuario."
Muchas gracias por la ayuda de antemano.
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.
Este es el código que estoy intentando utilizar para agregar el grupo.
1
2
3
4
5
6
7
8
9
10
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;
Al ejecutar el código me lanza un mensaje que dice "No se ha encontrado el nombre de usuario."
Muchas gracias por la ayuda de antemano.
Valora esta pregunta
0