>>>Hi
>>>
>>>I know that GETDIR() allows users to select a directory, but it seems restricted to drive letters, whether local or mapped.
>>>
>>>Is there a way of selecting a directory across a network (as in Explorer or Network Neighborhood) within VFP6 SP4 / Win 98SE code without mapping the location first?
>>>
>>>Thanks
>>>
>>>Mike
>>
>>Mike,
>>
Declare integer GetActiveWindow in WIN32API
>>oShell = createobject("Shell.Application")
>>oFolder = oShell.BrowseForFolder(GetActiveWindow(), "Please Select folder", 0 )
>>oFolderItems = oFolder.Items
>>oFolderItem = oFolderItems.Item[0]
>>? oFolderItem.Path
Cetin
>
>Mike,
>Correction. Above would return first item's path in selected folder.
>What you want would be :
>
Declare integer GetActiveWindow in WIN32API
>oShell = createobject("Shell.Application")
>oFolder = oShell.BrowseForFolder(GetActiveWindow(), "Please Select folder", 0 )
>? oFolder.Items.Item.Path
Cetin,
You can do away with the API call there. The hwnd parameter, while not optional, can be zero.
George
Ubi caritas et amor, deus ibi est