Problem in Rhino 6 scripting

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?

Iā€™m looking into this.

ā€” Dale

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

Hi @achelon,

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

ā€“ Dale

Thanks a lot