VBA 获取 LDAP 的对象类型和库答案

【问题标题】：VBA get object type and library for LDAPVBA 获取 LDAP 的对象类型和库
【发布时间】：2013-05-16 16:44:56
【问题描述】：

有没有人知道一种类似于 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)

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

Dim a as object

语句的类型。

【问题讨论】：

您想摆脱Dim a as Object 并将其替换为Dim a As ADODB.Connection 或Dim a As Excel.Application 等？？
在我的情况下，我想做 Dim a As LDAP 除非我找不到实际的对象类型。
试过TypeName(obj)

【解决方案1】：

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

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

【讨论】：