>Hi all
>
>I have this directory command button which calls GETDIR(). This dialog does not show unmapped network drives. What I am expecting is UNC from this dialog.
>
>Any alternatives where I can get UNC names?

* Get directory
* Get directory specifying \\server\share as root
*oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0,'\\server\share')
* Get directory or file
*oFolder = oShell.BrowseForFolder(0, "Please Select folder or file", BIF_BROWSEINCLUDEFILES)
* Get directory or file specifying \\server\share as root
*oFolder = oShell.BrowseForFolder(0, "Please Select folder or file", ;
* BIF_BROWSEINCLUDEFILES,'\\server\share')

#define BIF_BROWSEFORCOMPUTER  0x1000
#define BIF_BROWSEFORPRINTER   0x2000
#define BIF_BROWSEINCLUDEFILES 0x4000 
oShell = createobject("Shell.Application")
oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0 )
RETURN IIF( type('oFolder.Items.Item')='O', oFolder.Items.Item.Path, '')

Cetin