Valid Disk Drives

[pac1exl]

Is there any function\library in MS Access that will list to me all the valid drives that exists in a workstation?

 

[tlbroadbent]

Check the code at MVPS.ORG.

http://www.mvps.org/access/api/api0003.htm

Terry L. Broadbent
FAQ183-874 contains tips for posting questions in these forums.
NOTE: Reference to the FAQ is not directed at any individual.

 

[mymou]

Hi pac1exl

Or check out FileSydtemObject. Something like:

Function ShowDriveList()
Dim fso, d, dc, s, n
Set fso = CreateObject("Scripting.FileSystemObject&quot
Set dc = fso.Drives
For Each d In dc
s = s & d.DriveLetter & " - "
If d.DriveType = Remote Then
n = d.ShareName
ElseIf d.IsReady Then
n = d.VolumeName
End If
s = s & n & &quot;<BR>&quot;
Next
ShowDriveList = s
End Function


Stew &quot;Even a stopped clock tells the right time twice a day.&quot;