Version: 3.0
The Drives collection is the collection of all the disk drives available on the system. This collection is obtained through the Drives property of the FileSystemObject object.
<%
Dim filesys, drv, drvcoll, drvlist, vol
Set filesys = CreateObject("Scripting.FileSystemObject")
Set drvcoll = filesys.Drives
For Each drv in drvcoll
drvlist = drvlist drv.DriveLetter
If drv.IsReady Then
vol = drv.VolumeName
End If
drvlist = drvlist vol ", "
Next
Response.Write "Drives available on this system are " drvlist
%>
"Drives available on this system are A, C, D, E,"
This code gets the Drives collection, creates a list of available drives and displays the results in the browser.
Syntax: object.Count
Returns an integer that tells us how many Drive objects there are in the collection (the number of local and remote drives available).
Syntax: object.Item(drive)
The Item property allows us to retreive the value of an item in the collection designated by the specified key argument and also to set that value by using itemvalue.