DevGuru VBScript Object: Drives Collection



			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]