ISCommonDialogs.NewSaveDialog

Description

This function returns a new save dialog.

Syntax

object.NewSaveDialog()

Part	Attribute	Type	Description
`object`	Required	ISCommonDialogs	The `object` always implements the ISCommonDialogs interface

Return Value

ISSaveFileDialog

Returns a new save dialog.

Example

Show the dialog and display the selected file name.

Dim aDialog
Dim aResult

set aDialog = Profile.CommonDialog.NewSaveDialog
aDialog.Caption = "Save Recent Notes"
aDialog.Filter = "*.tx||*.rtf||*.doc||*.*||"
aDialog.FileName = "MyNotes.txt" 

aResult = aDialog.Execute

if aResult then 
  Profile.MsgBox("The selected file name is """ & aDialog.FileName & """")
else 
  Profile.MsgBox("The file name was not selected")
end if

Note:

Version information

Added in v7.8.0