取得指定驅(qū)動(dòng)器的總?cè)萘?/div>

代碼:

<!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>Total size in bytes: " & d.TotalSize

Response.Write(n)

set d=nothing

set fs=nothing

%>

 

</body>

</html>

結(jié)果:

Drive: C:
Total size in bytes: 598876352512

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