6-1.asp

来自「而他65 人引入一45同意4yuh7iu7若他其二分3儿·56一6y65y7u7」· ASP 代码 · 共 10 行

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