CreateObject("Rhino3.Application") hangs on Windows 10

Scripting
,
1

On Windows 10, I can’t connect to Rhino3 for External Access.

Task manager shows a process for Rhino3.exe -Embedding

Do I have to regsvr32 some dll?

This results in the error “ActiveX component can’t create object”.

' Try creating a Rhino Application object

Dim objRhino

' On Error Resume Next

Set objRhino = CreateObject("Rhino3.Application")

If Err.Number <> 0 Then

  Call WScript.Echo("Failed to create Rhino object.")

  ' Exit Sub

else 


Call WScript.Echo("Rhino object created.")

End If
2

I have a VB6 application that runs scripts on Rhino3. It works on Windows 7. It’s not working on Windows 10. Is it because Windows 10 is 64-bit?

3

Hi @user2971,

This seems to work here. This is what I did:

1.) Installed Rhino 3 SR5b on Windows 10 Pro.
2.) Ran Rhino 3 once “as administrator”
3.) Saved the following code to test.vbs:

On Error Resume Next
Set objRhino = CreateObject("Rhino3.Application")
If Err.Number <> 0 Then
  Call WScript.Echo("Failed to create Rhino object.")
Else 
  Call WScript.Echo("Rhino object created.")
End If

4.) From a command prompt, ran cscript test.vbs

image

– Dale

1 Like
4

Thank you! It worked after I installed SR5b. I was trying this with SR5.