|  
 | 
OBJECT: 
             Drives Collection
 
            
 object.Drives
 
 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
 Returns an Item from the collection relating to a specified key (drive name).
 
 Syntax: object.Item(drive)
 
 
 METHODS
 
 The Drives collection has no Methods.
 
 
 
 Copyright 1999 by Infinite Software Solutions, Inc.Trademark Information
 |