GefObject.Script (read-only property)

Gets the GefScript of the object.

Syntax:

Set GefScript = object.Script

Description:

The Script property returns the GefScript object.

Example:

Sub GefObject_Script()

Dim oCimObj As GefObject

    Dim oCimScript As
GefScript

Set oCimObj = CimGetObject

    Set oCimScript =
oCimObj.Script

    MsgBox "The current script(s) on " & oCimObj.Name & _
        " are: " & Chr$(10) & Chr$(10) & oCimScript.Script

End Sub