创建属性

可使用下列 Microsoft Visual Basic, Scripting Edition (VBScript) 代码示例将新的 Property 对象添加到 IIS ADSI 架构中。

创建 Property 对象

  1. 绑定到 Schema 容器。
  2. 创建新的 Property 对象。
  3. 设置对象的语法值。默认语法为字符串。下表列出可能的语法值。
    4. 语法值 描述
    布尔型 布尔型变量（TRUE 或 FALSE）
    整数 32 位有符号整型
    字符串 以 Null 结尾的字符串
    ExpandSz 双 Null 结尾的字符串列表
    列表 Null 结束字符串数组
    IPSec IPSecurity 数据类型
    NTAcl Windows 访问控制列表 (ACL)
    MimeMapList MimeMap 对象数组

  4. 将新的 Property 对象写入配置数据库中。

示例

'获取计算机名的参数。
Dim MachineName
Dim PropertyName
Dim ArgObj
Set ArgObj=WScript.Arguments
MachineName=ArgObj.Item (0)
PropertyName=ArgObj.Item (1)
'绑定到 Schema 容器对象。
Dim SchemaObj
Dim NewPropertyObj
Set SchemaObj=GetObject ("IIS://" & MachineName & "/Schema")
'创建新属性。
Set NewPropertyObj=SchemaObj.Create ("Property", PropertyName)
'设置对象的语法。
'默认语法是字符串。
'必须在调用 SetInfo 之前设置语法。
NewPropertyObj.Syntax="string"
'通过继承设置 NewPropertyObject 的特性。
NewPropertyObj.Inherit=True
'将 NewPropertyObject 写入架构中。
NewPropertyObj.SetInfo
相关主题

© 1997-2003 Microsoft Corporation。保留所有权利。