Rhino 6.0.18016.23451: Rhino script form external access

@sdona wrote:

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).

Can enyone help me?
Thanks in advance

Posts: 1

Participants: 1

Read full topic