
<html>

<body>



<%

dim fs, d, n

set fs=Server.CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("文件系统是：" & d.FileSystem)

set d=nothing

set fs=nothing

%>



</body>

</html>