Releases the Rhino object without closing the Rhino application.
ReleaseWithoutClosing |
Number. 1 = release without closing, 0 = do not release without closing. |
Dim objRhino
On Error Resume Next
Set objRhino = CreateObject("Rhino.Application")
If Err.Number == 0 Then
objRhino.ReleaseWithoutClosing = 1
End If