FreeSpace
ディスクの空き容量取得
文法
Driveオブジェクト.FreeSpace
機能説明
ディスクの空き容量をバイト単位で取得
使用例
<![CDATA[
<%
Dim objFs,objDrv
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
Set objDrv = objFs.GetDrive("C")
Response.Write "空き容量 : " & objDrv.FreeSpace & "バイト<br>"
'オブジェクトを開放
Set objDrv = Nothing
Set objFs = Nothing
%>
]]>
Topへ