Vb.Net - Get project file path

[premysl.misun]

Hi,

how I can get in Vb.net directory path of active project file (.ipj) in Inventor 2019?

I want to create some folders in directory of active project file and I do not know how.

Thank you for you answers.

P.

[R.Mabery · Accepted solution]

I believe this is what you are looking for:

InvApp.DesignProjectManager.ActiveDesignProject.WorkspacePath

[bradeneuropeArthur]

this is what you need:

Public Sub main()
Dim a As Application
Set a = ThisApplication

Dim b As FileOptions
Set b = a.FileOptions

MsgBox b.ProjectsPath
End Sub

[NachoShaw]

Hey

I made this as a button to open my project folder to save me browsing for it. Hope it helps

Sub ProjectFolder()

    Dim oFileLocations As FileLocations
    Set oFileLocations = ThisApplication.FileLocations

            Dim FolderPath As String
            FolderPath = oFileLocations.Workspace
        
            Shell "explorer.exe" & " " & FolderPath & "", vbNormalFocus
            
                     
        End Sub

Nacho

[JBerns]

@NachoShaw ,

Thanks for the useful code. I offer the following suggestion:

FolderPath = oFileLocations.Workspace & "\"

This ends the path with a backslash.

Otherwise, Explorer tries to open the folder as a file. That is what I experienced with Window 10. Perhaps this is not needed in earlier Windows versions.

Regards,

Jerry

[p.sangeetaKZZMH]

Hi Randy sir,

When i use the same line of code in Electrical, I am getting below error

: 'Public member 'DesignProjectManager' on type 'IAcadApplication' not found.'