<html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
if fs.driveexists("c:") = true then
Response.Write("驱动器 c: 存在。")
Else
Response.Write("驱动器 c: 不存在。")
End If
Response.write("<br />")
if fs.driveexists("g:") = true then
Response.Write("驱动器 g: 存在。")
Response.Write("驱动器 g: 不存在。")
set fs=nothing
%>
</body>
</html>