Syntax

GefObject = CimGetObject ( )

Description

Returns the GefObject Automation object representing the object owning this script.

Status

The extension can be used.

Example

Dim led As GefObjectModel.GefObject

Dim var As GefObjectModel.GefObjectVariable

Set led = CimGetObject()

Set var = led.GetVariable("on")

var = Not var.GetValueAsNumber()

CimGetScreen.Refresh False

Basic Extensions.