Code will not run in debuger
Posted: Fri Aug 12, 2011 1:56 am
The following script direct from MSDN runs fine from the command line using either cscript or wscript but just 'hangs' when run from within PrimalScript. It is like the dialog is opened just not visible.
Is there a config setting or perhaps another way to open a folder browser that will work from within PrimalScript? I have become spoiled by the Ctrl-F5 functionality
Is there a config setting or perhaps another way to open a folder browser that will work from within PrimalScript? I have become spoiled by the Ctrl-F5 functionality
Code: Select all
Const WINDOW_HANDLE = 0
Const OPTIONS = 0
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder _
(WINDOW_HANDLE, "Select a folder:", OPTIONS, "C:")
If objFolder Is Nothing Then
Wscript.Quit
End If
Set objFolderItem = objFolder.Self
objPath = objFolderItem.Path
Wscript.Echo objPath