6-1.asp

而他65 人引入一45同意4yuh7iu7若他其二分3儿·56一6y65y7u7

<%
   dim fso,ds
   Set fso=Server.CreateObject("Scripting.FileSystemObject")  '创建对象实例
   Set ds=fso.Drives    '使用其属性
  
   For Each Drive in ds   '循环
	Response.Write("本机驱动器: " & Drive.DriveLetter & "<br>") 
   Next
%>