Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Getdir() across Network
Message
From
25/05/2001 05:33:01
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
 
To
25/05/2001 05:11:09
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00511371
Message ID:
00511383
Views:
20
This message has been marked as the solution to the initial question of the thread.
>>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
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform