Browse from VBScript
Something very simple yet complicated is trying to get a browse dialog using vbs.
So here is a snippet that will help in adding a Browse dialog like in the pic , instead of a message box asking for the absolute/relative path of the folder:
Const EDITBOX = &H10
Const DIALOGSTYLE = &H40
Set objShell = CreateObject("Shell.Application")
Set objFolder= objShell.BrowseForFolder(0, "My Computer:",EDITBOX Or DIALOGSTYLE)
Browse = objFolder.Items.Item.path
If Err.Number > 0 Then
MsgBox("You have not selected a folder." & vbCrlf & "This script will not continue!")
Hope this helps!