<!DOCTYPE html>
<html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
如果 fs.driveexists("c:") = true 那麼
Response.Write("驅動器 c: 存在。")
Else
Response.Write("驅動器 c: 不存在。")
End If
Response.write("<br>")
如果 fs.driveexists("g:") = true 那麼
Response.Write("驅動器 g: 存在。")
Else
Response.Write("驅動器 g: 不存在。")
End If
set fs=nothing
%>
</body>
</html>