2

我有以下代码可以将 distinctName 转换为 sAMAccountName:

Dim de As New DirectoryEntry("LDAP://" & stringDN)
Return CType(de.Properties("samaccountname")(0), String)

它适用于我通过的每个 DN,除了一个。我们的域中有一个 AD 组,其中有一个“/” - 称之为“程序员/DBA”。该组的 DN 是“Programmers/DBA,OU=User Groups,DC=mydomain,DC=local”。当我尝试将此 DN 用作上面的 stringDN 时,我收到“未知错误 (0x80005000)”的 COMException。

我域中的所有其他组/用户都可以正常工作,并且我在我们的测试域中复制了该问题,在该域中重命名该组使其不包含“/”可以解决问题。但是,我无法在生产中做到这一点,所以我被卡住了。

我可以以某种方式逃避这个“/”吗?我必须相信有一个解决方案,这样我才能正确获得这个组的属性。

4

1 回答 1

4

您是否尝试过这样做:

Dim de As New DirectoryEntry("LDAP://" & stringDN.Replace( "/", "\/" ))
Return CType(de.Properties("samaccountname")(0), String)
于 2009-02-09T22:30:41.717 回答