Obsolete

Replaced by a GefObject

Syntax

CimObject.ObjectCount

Description

Returns an Integer representing the number of CimObjects this object contains.

Example

Dim Obj As CimObject

Dim Child As CimObject

Set Obj = CimGetScriptOwner()

Dim Max As Integer

Max = Obj.ObjectCount - 1

Dim Index As Integer

For Index = 0 To Max

  Set Child = Obj.GetObject(Index)

Next Index

Obsolete basic extensions.