Basically this FileDialog object must be initiated by the Inventor Application, then we just need to configure some parameters and finally show to save or to open.
If the MultiSelectEnabled is set to true for ShowOpen, then the FileName property will return a string with files separated by | character, where the String.Split method can generate the list of files.
Public Sub CreateFileDialog()
‘ create the file dialog
Dim oDLG As FileDialog = Nothing
m_inventorApplication.CreateFileDialog(oDLG)
‘ configure
oDLG.FileName = "C:\Temp\Temp.ipt"
oDLG.Filter = "Inventor Part Files (*.ipt)|*.ipt"
oDLG.ShowSave() ‘ to save files
oDLG.ShowOpen() ‘ to open files
End Sub
Leave a Reply to Augusto GoncalvesCancel reply