cDriveLetter = "K:"
oFso = CreateObject("Scripting.FileSystemObject")
* Check if specified drive leter exists
? oFso.DriveExists(cDriveLetter)
...
* Get remote share name
oDrive  = oFso.GetDrive(cDriveLetter)
cShareName = oDrive.ShareName
...
* Enumerate all network drives
oNet = CreateObject("WScript.Network")
oDrives = oNet.EnumNetworkDrives()

FOR i=0 TO oDrives.Count-1 STEP 2
	? oDrives.Item(i), oDrives.Item(i+1)
ENDFOR

Check also Re: Determine Available Drives Message #841080 for alternative solution.


>Sergey,
> I have a couple of additional questions:
>
>1. How can I determine if the device name or drive letter is already in use?
>
>2. If in use how can I determine if the path is the path to my app?
>
>I am setting up our app to map a drive to the server if none exist during start up. This has become necessary due to the network configurations of some of our South american clients.
>
>Thanks a ton!