Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Getdir() across Network
Message
 
To
25/05/2001 05:33:01
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00511371
Message ID:
00511457
Views:
18
>>>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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform