Open Method Behaviour

[dbrblg]

Hi,

I am writing some code to convert a Parasolid .x_t file to an Inventor .ipt file.

I am using the following simplified code:

Private Sub Command0_Click()

    Dim invApplication As Inventor.Application

    Dim invDoc As Inventor.Document

    On Error Resume Next

    Set invApplication = GetObject(, "Inventor.Application")

    If (Err) Then

        Err.Clear

        Set invApplication = CreateObject("Inventor.Application")

        invApplication.Visible = True

    End If

    Set invDoc = invApplication.Documents.Open("\\a\b\Parasolid Files\A302262A.x_t", True)

    Call invDoc.SaveAs("\\a\b\c\A302262A.ipt", True)

    invApplication.Quit

    Set invApplication = Nothing

End Sub

All I get is Inventor giving me an error "Failed to open document" yet when I manually open Inventor > Open and choose this file there are no problems; the file is opened and there are no warnings or errors.

It appears it is a problem with using VBA.

Does anyone have any ideas?

Thanks

[YuhanZhang]

Is there more info from the error dialog? And on which Inventor version you see this problem?

[dbrblg]

Hi Rocky,

Unfortunately there is no more information, other than that.  

The problem is solved however.  It turns out Inventor will not allow the open method on a freshly opened inventor until an amount of time has elapsed.

If I put a 5 second delay between opening inventor and running the open method, everything works as it should.  

Perhaps in a future version, Inventor can have a 'ready' signal to check after opening in the API as I would imagine the 5 second time will be fine on my PC but not necessarily on others.

It is Inventor 2011

Kind regards

[YuhanZhang]

Fine to hear that you have found the point. The Application.Ready should have been there and you can make use of it.