Rhino 6.0.18016.23451: Rhino script form external access

unhandled

(Sdona) #1

Hi,
with Rhino 5 (32 bit) this .vbs script

Dim objRhino
On Error Resume Next
Set objRhino = CreateObject("Rhino5.Interface")
If Err.Number=0 then
nRetries = 0
Do While (nRetries < 10)
  If objRhino.IsInitialized = 0 Then
   Call WScript.Sleep(500)
  End If 
   nRetries = nRetries + 1
Loop
 Call objRhino.RunScript("_Open",0)
Else
  Call WScript.Echo("Rhino initialization failed")
End If

works well (it shows the open dialog file).

But with Rhino 6, the same .vbs script:

Dim objRhino
On Error Resume Next
Set objRhino = CreateObject("Rhino.Interface.6")
If Err.Number=0 then
nRetries = 0
Do While (nRetries < 10)
  If objRhino.IsInitialized = 0 Then
   Call WScript.Sleep(500)
  End If 
   nRetries = nRetries + 1
Loop
 Call objRhino.RunScript("_Open",0)
Else
  Call WScript.Echo("Rhino initialization failed")
End If

does not works (not shows the open dialog file).

Is there a problem of my installation or is a bug?

Thanks in advance


(Dale Fugier) #3

Hi @sdona,

This will be fixed in Service Release 2.

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

Thanks,

— Dale