VB.net - 创建用户组？

Question

我尝试使用vb.net创建名为Maintenance_app的用户组。

代码是：

Dim dom As New DirectoryEntry()
  Dim ou As DirectoryEntry = dom.Children.Find("")
  Dim grp As DirectoryEntry = ou.Children.Add("Maintenance_app", "group")
  grp.CommitChanges()

我在第二行收到以下错误：

An unknown directory object was requested

我做错了什么？

Answer 1

如果您想使用Active Directory，则需要了解LDAP ADsPath。

在你的情况下：

Dim dom as New DirectoryEntry
Dim ou as DirectoryEntry = dom.Children.Find("OU=yourOU")
Dim grp as DirectoryEntry = ou.Children.Add("CN=Maintenance_app", group")
grp.CommitChanges()

或者，如果您希望该组在没有OU的顶层，那么只需擦除第二行并将第3行更改为：

Dim grp as DirectoryEntry = dom.Children.Add("CN=Maintenance_app", group")

因为您似乎是Active Directory的新手，所以有些Glossar：

  

DN =专有名称

     

CN =通用名称

     

OU =组织单位

     

DC =域组件

公式示例：

  

DN =＆＃34; CN = Doe \，John，OU =员工，OU =伦敦，DC = fabrikam，DC = com＆＃34;

Active Directory中的每个对象都有自己的确切DN。