W3School TIY Editor
W3School 在线教程
改变方向
暗黑模式
<% dim fs,d,n set fs=Server.CreateObject("Scripting.FileSystemObject") set d=fs.GetDrive("c:") n = "此 " & d.DriveLetter if d.IsReady=true then n = n & " 驱动器已就绪。" else n = n & " 驱动器未就绪。" end if Response.Write(n) set d=nothing set fs=nothing %>