Drives on this Server

Drive: C:
Drive: D:
Drive: E:
Drive: Z:

Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set dc = fso.Drives
For Each d in dc
	Response.Write "Drive: " & d & "<BR>"
Next

set dc = Nothing
set fso = Nothing

FSO Demo Home