创建类

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

创建 Class 对象

  1. 绑定到 Schema 容器。
  2. 创建新的 Class 对象。
  3. 将新的 Class 对象写入配置数据库中。
示例
'   获取计算机名的参数。
Dim ArgObj
Set ArgObj=WScript.Arguments
MachineName = ArgObj.Item (0)
ClassName = ArgObj.Item (1)
'   绑定到 Schema 容器对象。
Dim SchemaObj
Dim NewClassObj
Set SchemaObj = GetObject ("IIS://" & MachineName & "/Schema")
'   为 ClassName 创建新的 Class 对象。
Set NewClassObj = SchemaObj.Create ("Class", ClassName)
'   将新的 Class 对象写入配置数据库中。
NewClassObj.SetInfo
相关主题

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