CimGetObject (function)

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