05-03-2012 04:48 AM
Hi,
Trying to specify the folder to save the output file.
Using MSCommonDlgAX activeX control and the below code behind the browse button. But I can specify only files but not folders.
Sub FilterBrowse_EventClick()
Dim This : Set This = FilterBrowse
MSCommonDlgAX.X.ShowSave
FilterFilePath.Text = MSCommonDlgAX.X.FileName
End Sub
Some please help in opening the windows explorer and choose the folder/Directory to save from Dialog Editor.
Regards,
Rsh
05-03-2012 05:16 AM
dim newfilepath
If (PathNameGet("ANY",,,,,,"Select the directory to save the new files into:") = "IDOk") Then
newfilepath=FileDlgDir
else
End If
05-04-2012 02:11 AM
This DIAdem command will open open the directory selector.
Option Explicit dim initPath : initPath = "C:\" if "IDOk" = PathDlgShow("Please select Path", initPath) then MsgBox OutPutPath end if
Greetings
Andreas