Problem in Rhino 6 scripting

Scripting
1

testing Rhino 6 automation i have found a new problem in this simple script:

Option Explicit
 
 ' Run the subroutine defined above
Call TestRhinoAutomation 

Sub TestRhinoAutomation
  Dim objRhino, objShell
  Set objShell = WScript.CreateObject("WScript.Shell")
    
  On Error Resume Next
  Set objRhino = CreateObject("Rhino.Application.6")
  objRhino.Visible = 1
 
  If objRhino.IsInitialized Then
    objRhino.RunScript "_Line",1
  End If
 
 End Sub

somebody can help me to understand where is the problem?

2

I’m looking into this.

https://mcneel.myjetbrains.com/youtrack/issue/RH-43783

— Dale

3

Hello Dale , the problem will be fixed in the future? thanks in advance

4

Hi @achelon,

Looking at the issue, it appears it has been fixed in SR2.

– Dale

5

Thanks a lot