topic Re: Initialdirectory does not function with ShowOpen in Inventor Programming Forum

Initialdirectory does not function with ShowOpen

TONELLAL — Mon, 04 Jun 2018 17:06:02 GMT

All is in the subject !

In 2007, this was identified as "High priority issue" : https://forums.autodesk.com/t5/inventor-customization/iv2008-sp1-ofiledialog-showsave-does-not-honor-the/m-p/2044244

In Inv 2009, it was not solved.

In Inv 2010, it was announced to be solved, but not... : https://forums.autodesk.com/t5/inventor-customization/vba-filedialog-object-problem-with-initialdirectory/m-p/2550148

In 2017, Autodesk is still working on it... : https://forums.autodesk.com/t5/inventor-customization/file-dialog-initial-directory-stuck-on-workspace/m-p/6883307

Can we expect it will be solved one day ?

PS : Sorry, I had not seen that it had only been more than 10 years since this had been identified as a "high priority issue".

Re: Initialdirectory does not function with ShowOpen

chandra.shekar.g — Tue, 05 Jun 2018 07:19:29 GMT

@TONELLAL,

As mentioned in the below forum discussion, FileDialog.InitialDirectory is ignored if assembly or part is open. If no document is opened and try to run below code, it recognizes mentioned directory as InitialDirectory.

https://forums.autodesk.com/t5/inventor-customization/file-dialog-initial-directory-stuck-on-workspace/m-p/6883992#M70273

Public Sub CreateFileDialog()

    Dim dlg As FileDialog
    Call ThisApplication.CreateFileDialog(dlg)
    
    dlg.InitialDirectory = "C:\Temp"
    dlg.Filter = "Inventor Files (*.ipt)|*.ipt | Assembly File (*.iam)|*.iam"
    dlg.DialogTitle = "Save Native"
    
    Call dlg.ShowOpen

End Sub

Thanks and regards,

Re: Initialdirectory does not function with ShowOpen

TONELLAL — Tue, 05 Jun 2018 11:05:49 GMT

The problem is I work on a file, so mandatory open, and in the workflow I need to open a config file (not Inventor file). Do you have a workaround in this case ? And when do you think the problem will be solved ?

Re: Initialdirectory does not function with ShowOpen

YuhanZhang — Wed, 06 Jun 2018 10:43:19 GMT

Can you let me which Inventor build do you use, and provide a snippet of VBA code to reproduce the problem? From your description you want to open a non-Inventor file when some document is open already, so can you try below VBA code if it works there(make sure to change the InitialDirectory) :

Sub TestFileDialogSample()
 ' Create a new FileDialog object.
 Dim oFileDlg As FileDialog
 Call ThisApplication.CreateFileDialog(oFileDlg)

 ' Define the filter to select part and assembly files or any file.
 oFileDlg.Filter = "Config Files (*.xml)|*.xml"
 oFileDlg.InsertMode = False

 ' Set the initial directory that will be displayed in the dialog.
 oFileDlg.InitialDirectory = "C:\Temp"

 ' Show the open dialog.
 oFileDlg.ShowOpen
 End Sub

Re: Initialdirectory does not function with ShowOpen

TONELLAL — Wed, 06 Jun 2018 16:00:35 GMT

Here's the code I use :

Sub test()

Dim oFileDlg As FileDialog
Set oFileDlg = Nothing

templatesPath = ThisApplication.DesignProjectManager.ActiveDesignProject.templatesPath

Call ThisApplication.CreateFileDialog(oFileDlg)

oFileDlg.DialogTitle = "Save config file"
oFileDlg.Filter = "XML Files (*.xml)|*.xml"
oFileDlg.InitialDirectory = templatesPath
oFileDlg.CancelError = True
oFileDlg.InsertMode = False
'oFileDlg.ShowSave
oFileDlg.ShowOpen

End Sub

It works fine since I added "oFileDlg.InsertMode = False".

Now I have the same problem with ShowSave... InsertMode does nothing in this case ...

Since the dialog box itself does nothing, is it possible to use ShowOpen only to display a dialog box, but to save the file after ? What is the différence between ShowSave and ShowOpen ?

Inventor I use is 2016.2.3 build 236

Re: Initialdirectory does not function with ShowOpen

chandra.shekar.g — Thu, 07 Jun 2018 06:04:36 GMT

@TONELLAL,

oFileDlg.InsertMode Property is related to ShowOpen method. For more details, go through below Inventor API documentation link.

http://help.autodesk.com/view/INVNTOR/2018/ENU/?guid=GUID-CA065814-A0F7-429D-A097-8E14D71D6C56

Thanks and regards,

Re: Initialdirectory does not function with ShowOpen

YuhanZhang — Thu, 07 Jun 2018 08:58:33 GMT

So the ShowOpen works fine there. The ShowOpen and ShowSave will display the dialog with different caption and use the Open dialog for Save would confuse users. A workaround now for the ShowSave is to specify the FileName property with a default filename for it, then it will direct to the folder you specify, try below VBA sample and let me if it is acceptable:

Sub TestFileDialogSample()
 ' Create a new FileDialog object.
 Dim oFileDlg As FileDialog
 Call ThisApplication.CreateFileDialog(oFileDlg)

 ' Define the filter for file type.
 oFileDlg.Filter = "Config Files (*.xml)|*.xml"

 ' Save the file to the C:\Temp\ and set a default name for it.
 oFileDlg.FileName = "C:\Temp\DefaultFileName"
 
 ' Show the save dialog.
 oFileDlg.ShowSave
 End Sub

Re: Initialdirectory does not function with ShowOpen

TONELLAL — Thu, 14 Jun 2018 11:42:54 GMT

Ok, it functions !

Thanks,

Alain

Re: Initialdirectory does not function with ShowOpen

YuhanZhang — Fri, 15 Jun 2018 02:22:50 GMT

Thanks for the feedback.

Re: Initialdirectory does not function with ShowOpen

RoyWickrama_RWEI — Tue, 11 Sep 2018 07:46:08 GMT

Your posting helped me to get around my issue I had in my other posting. Thanks.