>>>Hi, there is a way to show all computers and all shared resouces within a network from Vfp. Thanks !!!
>>
>>Something like getdir ? Or you can use BrowseForComputer too.
>>
>>

oShell = createobject("Shell.Application")
>>oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0 )
>>*oFolder = oShell.BrowseForFolder(0, "Please Select folder", 0, '\\server\share' )
>>? oFolder.Items.Item.Path

PS:Also in VFP7 via GetDir() you can do the same thing.
>>Also check anetresources().
>
>Cetin,
>
>I think this should be:

#define BIF_BROWSEFORCOMPUTER  0x1000
>oShell = CreateObject("Shell.Application")
>oFolder = oShell.BrowseForFolder(0, "Please Select Computer", BIF_BROWSEFORCOMPUTER)

If anything other than a computer is selected the OK button is disabled.

Right George,
I always felt it was another method :)
Cetin