>Hi!
>rather than reinvent the wheel I am looking for some code or an Active X
>that will allow me to browse the folder structure and select a folder
>both on the network and all disks. This could for example be a treeview
>on the left hand side or a drop down list from which I can select a folder
>Is there any such code around on the UT?
>
>Thanks

Of course there is Tim :)
If you want to do treeview directory listing-selecting check UT magazine June issue. Code is there in zip.
If you want browseforfolder like shell open does :

#define BIF_BROWSEFORCOMPUTER  0x1000
#define BIF_BROWSEFORPRINTER   0x2000
#define BIF_BROWSEINCLUDEFILES 0x4000 

oShell = createobject("Shell.Application")
* Get directory
oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0 )
* Get directory specifying \\server\share as root
*oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0,'\\poseidon\public')
* 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,'\\poseidon\public')
if type('oFolder')='O'
	? oFolder.Items.Item.Path
else
	? 'Cancelled'
endif
return

Cetin