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

by

The secret to using the common dialog from VBScript (or VBA or JScript, for that matter) is that you have to have its license installed on your machine. Certain development tools, such as Visual Basic 6, will install the license, but it’s also installed by the free Microsoft HTML Help Editor (this is a pretty old app). The interesting thing is that if you install and then uninstall the HTML Help Editor, it leaves the Common Dialog License in place. For this reason I would consider the license to be freely available and so will include the registry entry it creates here in my answer:

In HKLM\Software\CLASSES\Licenses\4D553650-6ABE-11cf-8ADB-00AA00C00905, set the (Default) entry to gfjmrfkfifkmkfffrlmmgmhmnlulkmfmqkqj.

Once that’s in place, you can create these dialogs from within a VBScript using code like this:

Set objDialog = CreateObject("MSComDlg.CommonDialog")

To launch a file save dialog, use the ShowSave method as in this code:

objDialog.ShowSave

Of course this object has a bunch of other methods and properties, and you’ll probably want to configure the appropriate properties before launching the dialog. For example, you can set the file filter so only certain file extensions are shown in the dialog. There’s a nice reference to the control on the MSDN site here: http://msdn.microsoft.com/en-us/library/aa259661%28v=vs.60%29.aspx.

Hope this helps. Let me know if you have any questions.

More Related Contents:

  1. About using Double quotes in Vbscript
  2. VBScript — Using error handling
  3. Can I pass an argument to a VBScript (vbs file launched with cscript)?
  4. Getting current directory in VBScript
  5. Read and write binary file in VBscript
  6. How do I run a VBScript in 32-bit mode on a 64-bit machine?
  7. Download a file with VBS
  8. Launch programs whose path contains spaces
  9. Parameterized query in Classic Asp
  10. Access network share from within VBScript eg FileSystemObject
  11. ByRef and ByVal in VBScript
  12. Run Command Line & Command From VBS
  13. Lists in VBScript
  14. Order of Files collection in FileSystemObject
  15. VBScript: What is the simplest way to format a string?
  16. VBScript to send email without running Outlook
  17. How can I use Clipboard in vbscript? [duplicate]
  18. How to set delay in vbscript
  19. Find my own process ID in VBScript
  20. Passing-variable-from-vbscript-to-batch-file with arguments
  21. Passing Parameters to a Stored Procedure using ASP
  22. How can I show a message box with two buttons?
  23. WScript.Shell.Exec – read output from stdout
  24. How to use GetObject in VBScript
  25. How can I convert a VBScript to an executable (EXE) file? [closed]
  26. Vbscript list all PDF files in folder and subfolders
  27. Can not send mail using smtp.gmail.com, port 587 from vbs script
  28. MSGbox in VBS that updates with value of variable
  29. Create a folder in Outlook: error 800A0401 – Expected End of Statement
  30. VBscript error input past end of file

Leave a Comment