<完整驱动器对象参考
如果指定的驱动器已准备就绪，假如果不是的isReady属性返回true。
句法
DriveObject.IsReady
例
<%
dim fs,d,n
set fs=Server.CreateObject("Scripting.FileSystemObject")
set d=fs.GetDrive("a:")
n = "The " & d.DriveLetter
if d.IsReady=true then
n=n & " drive is ready!"
else
n=n & " drive is not ready!"
end if
Response.Write(n)
set d=nothing
set fs=nothing
%>
Output:
The A drive is not ready!
<完整驱动器对象参考