vba - VBA 获取 LDAP 的对象类型和库

Question

有谁知道一种类似于 TypeName() 的方法来获取对象的名称？例如：

Dim obj
Set obj = GetObject("ADODB.Connection")
Debug.Print ObjectType(obj)

我希望它打印出“ADODB.Connection”而不是像 TypeName() 这样的“Object”。这是问题的简化版本，我很可能会这样做：

Dim obj
Set obj = GetObject("LDAP://" & DN)
Debug.Print ObjectType(obj)

这一切的原因是我可以摆脱所有这些：

暗淡 a 作为对象

声明的类型。

Answer 1

我假设您已经继续前进，因为该线程已过时，但是作为在搜索和回答同一问题时偶然发现此问题的人，我想我会为下一个人发布答案。

您需要添加的参考是Active DS 类型库，如果您正在搜索用户信息，则对象类型是 ActiveDs.IADsUser。