取得指定驅(qū)動(dòng)器的可用空間數(shù)

代碼:

<!DOCTYPE html>

<html>

<body>

 

<%

Dim fs, d, n

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

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

n = "Drive: " & d

n = n & "<br>Available Space in bytes: " & d.AvailableSpace

Response.Write(n)

set d=nothing

set fs=nothing

%>

 

</body>

</html>

結(jié)果:

Drive: C:
Available Space in bytes: 466982301696

相關(guān)文章
亚洲国产精品第一区二区,久久免费视频77,99V久久综合狠狠综合久久,国产免费久久九九免费视频