GetFolderName

Invokes the common Folder dialog.

Parameters
TitleStr
Optional: Title to display in the dialog caption. If omitted, the caption displays “Browse for Folder”.
DescriptionStr
Optional: Custom text to display in the dialog window. If omitted, the window displays “Currently selected folder:”.
FolderStr
Optional: The default path of the folder to select.
Returns
The full path and name of the selected folder, or an empty string if the selection was canceled.
Example
Set bzhao = CreateObject("BZWhll.WhllObj")
bzhao.Connect
Folder1 = bzhao.GetFolderName("Base Folder Selection", "Select the 
root folder to use:", "c:\")
MsgBox Folder1