oShell = createobject("Shell.Application") oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0 ) *oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0, '\\server\share' ) ? oFolder.Items.Item.PathPS:Also in VFP7 via GetDir() you can do the same thing.