How can I use the common Save As dialog from VBScript?

Question

I\'d like to have my VBScript display the Windows Save As dialog box, but I could not find out how to do it.

Using this code:

Dim sfd
Set sfd = Creat         


        

Answer 1

On http://blogs.msdn.com/b/gstemp/archive/2004/02/18/75600.aspx there is a way descibed how to show an Save As dialog from VBScript.

Note that according to http://www.eggheadcafe.com/software/aspnet/29155097/safrcfiledlg-has-been-deprecated-by-microsoft.aspx SAFRCFileDlg has been deprecated by Microsoft.