Returns the RhinoScript automation (COM) object.
GetScriptObject ()
None
Object |
The RhinoScript automation (COM) object if successful. |
Null |
If not successful, or on error. |
Dim objRhino, objRhinoScript
On Error Resume Next
Set objRhino = CreateObject("Rhino.Application")
If Err.Number == 0 Then
If 1 = objRhino.IsInitalized Then
objPlugIn.GetScriptObject
End If
End If