Object Reference

xf_InteractInteraction

Public Function SaveFileDialog_All (
DialogTitle As String,
DefaultExtension As String,
Optional InitialDir As String,
Optional DefaultFilename As String,
Optional FileMustExist As Boolean = True,
Optional HideReadOnly As Boolean = True
) As String

Display a 'save file' dialog with the filter set for any kind of file.
Returns a string containing the selected file path or an empty string if 'Cancel' was pressed or nothing was selected.

DefaultFilePath

The default path for the file browsing window

DialogTitle as String

The caption to appear in the title bar at the top of the dialog window

DefaultExtension as String

The default extension if none is specified for the file

Optional InitialDir as String

(no description)

Optional DefaultFilename as String

(no description)

Optional FileMustExist as Boolean = True

Insist that the selected file must exist

Optional HideReadOnly as Boolean = True

Hide read-only files

Call Template:

Dim s As String

s = xf.Interact.SaveFileDialog_All(DefaultFilePath, DialogTitle, DefaultExtension)

s = xf.Interact.SaveFileDialog_All(DefaultFilePath, DialogTitle, DefaultExtension, InitialDir, DefaultFilename, FileMustExist, HideReadOnly)

Example 1:

Dim s As String
s = xf.Interact.SaveFileDialog_All("Save File")
If s <> "" Then txtFilePath = s