IADsProperty 接口 (iads.h)
IADsProperty 接口旨在管理架构类对象的单个属性定义。 特性定义指定属性的最小值和最大值、其语法以及属性是否支持多个值。 架构管理涉及的其他接口包括 IADsClass 和 IADsSyntax。
IADsProperty 接口公开用于按名称、语法、值范围和任何其他已定义属性描述属性的方法。 一个属性可以有多个与之关联的名称,但提供程序必须确保每个名称都是唯一的。
使用 IADsProperty 接口在运行时确定目录服务对象支持的属性的属性定义。
在运行时确定属性定义
- 绑定到 ADSI 对象的架构类对象。
- 枚举可从架构类对象访问的必需或可选属性。 如果知道 对象支持感兴趣的 属性,请跳过此步骤。
- 绑定到在第一步中获取的架构类对象的架构容器。
- 从架构容器中检索感兴趣的属性的属性定义对象。
- 检查 属性的属性定义。 可能还需要检查语法对象。
继承
IADsProperty 接口继承自 IDispatch 和 IAD。 IADsProperty 还具有以下类型的成员:
方法
IADsProperty 接口具有这些方法。
IADsProperty::限定符 返回描述此属性的其他限定符的 ADSI 对象的集合。 |
注解
IADsProperty 接口方法可以将新属性和属性对象添加到特定于提供程序的实现中。
示例
下面的代码示例演示上述过程,用于应用 IADsProperty 接口来确定属性的属性定义。
Dim obj As IADs
Dim cl As IADsClass
Dim pr As IADsProperty
Dim sy As IADsSyntax
Dim sc As IADsContainer
On Error GoTo Cleanup
' Step 1
Set obj = GetObject("WinNT://myMachine,computer")
Set cl = GetObject(obj.Schema)
' Step 2
' Skip it, assuming the "Owner" attribute is supported by obj.
' For the computer object in this example, it is indeed one of
' the supported optional properties.
' Step 3
Set sc = GetObject(cl.Parent)
' Step 4
Set pr = sc.GetObject("Property","Owner")
' Step 5
MsgBox "Attribute: " & pr.Name
MsgBox "Syntax: " & pr.Syntax
If pr.Multivalued = True Then
MsgBox "The Owner attribute has multiple values."
Else
MsgBox "The Owner attribute has a single value."
End If
' To further examine the syntax
Set sy = GetObject(sc.AdsPath & "/" & pr.Syntax)
MsgBox "Syntax object: " & sy.Name & " of OleAutoDataType: " _
& sy.OleAutoDataType
Cleanup:
If (Err.Number <> 0 ) Then
MsgBox("An error has occurred. " & Err.Number)
End If
Set obj = Nothing
Set cl = Nothing
Set pr = Nothing
Set sy = Nothing
Set sc = Nothing
要求
最低受支持的客户端 | Windows Vista |
最低受支持的服务器 | Windows Server 2008 |
目标平台 | Windows |
标头 | iads.h |