OBJECT:  Drives Collection

Implemented in 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.

The following code gets the Drives collection, creates a list of available drives and displays the results in the browser.

Code:
<%
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
%>


Output:
"Drives available on this system are A, C, D, E, "

PROPERTIES

Count Property
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.Count

Item Property
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.

Syntax: object.Item(key) [ = itemvalue]
 


Copyright 1999-2004 by Infinite Software Solutions, Inc. All rights reserved.
Trademark Information