获取记录集的价值

Question

我有一个从Active Directory获取属性记录集的功能。

我可以像这样访问大多数返回的值

Set rs = cmd.Execute

Debug.Print (rs.Fields("distinguishedName").Value)
Debug.Print (rs.Fields("GivenName").Value)

不过，postOfficeBox的返回值看起来像是一个变体。

如何获取值？我尝试过

Debug.Print (rs.Fields("postOfficeBox").value(0))

那不起作用-运行时错误450。

Answer 1

感谢蒂姆·威廉姆斯。我设法让它返回这样的值：

Dim arrPOBox As Variant
Dim strPOBox As String
....
Set rs = cmd.Execute
arrPOBox = rs.Fields("postOfficeBox").Value
strPOBox = CStr(arrPOBox(0))