将组添加到组（Active Directory）Delphi

Question

我正在创建一个与Active Directory交互的应用程序（列表组，将用户添加到组等）。我的问题是我无法将组添加到现有组。 我使用ActiveDs_TLB和adshlp。

这是我尝试添加组的代码。

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;

当我运行代码时，它会向我发送一条消息，说明＆＃34;找不到用户名。＆＃34;

非常感谢您提前提供帮助。

Answer 1

对于可能对解决方案感兴趣的人。代码很好，主题在Active Directory中的组范围内。

1-您无法将具有相同范围的另一个组添加到具有全局范围的组中。 2-可以将全局范围组添加到具有本地域范围的组中。 3-可以将同一域的另一个组添加到本地域范围组。

这些限制属于IADsGroup级别，因为AD管理工具可能会有所不同。

问候语。