Scripting Runtime Library(FileSystemObject)

지정한 드라이브나 네트워크 공유 영역에서 사용 가능한 공간의 크기를 반환한다.

인수
object : (개체)

object는 항상 Drive 개체이다.

: (속성 정수값)

속성값은 지정한 드라이브나 네트워크 공유 영역에서 사용할 수 있는 크기를 바이트 단위로 나타내는 정수값이다.

이 속성은 읽기전용로 디폴트값은 없다.

설명

지정한 드라이브나 네트워크 공유 영역에서 사용자가 사용할 수 있는 공간의 크기를 byte 수로 반환한다.

FreeSpace 속성이 반환하는 값은 보통 AvailableSpace 속성이 반환하는 값과 같다.
그러나 할당량을 지원하는 컴퓨터 시스템에서는 두 값이 서로 다를 수도 있다.


FreeSpace 속성 예제

결과 표시창
JScript FreeSpace 속성 예제
<SCRIPT language=JScript>
function FreeSpaceTest(){
  var fso,driveObj,str='';
  fso=new ActiveXObject('Scripting.FileSystemObject');
  enumObj=new Enumerator(fso.Drives);
  for (; !enumObj.atEnd(); enumObj.moveNext()){
    driveObj=enumObj.item();
    str+='드라이브 '+driveObj.DriveLetter+': - ';
    if (driveObj.IsReady) str+=driveObj.FreeSpace+' byte<BR>';
    else str+='준비 안됨<BR>';
  }
  return(str);
}
</SCRIPT>

<DIV id=showjs class=show alt="결과">결과 표시창</DIV>
<DIV class=show onClick="showjs.innerHTML=FreeSpaceTest()">
  <SPAN class=ie>JScript</SPAN> <SPAN class=property>FreeSpace</SPAN> 속성 예제</DIV>

VBScript로 반복

결과 표시창
VBScript FreeSpace 속성 예제
<SCRIPT language=VBScript>
Function FreeSpaceTestvb()
  Dim fso,driveObj
  str=""
  Set fso=CreateObject("Scripting.FileSystemObject")
  Set drivesCol=fso.Drives
  For Each driveObj in drivesCol
    str=str&"드라이브 "&driveObj.DriveLetter&": - "
    If driveObj.IsReady Then
      str=str&driveObj.FreeSpace&" byte<BR>"
    Else str=str&"준비 안됨<BR>"
    End If
  Next
  FreeSpaceTestvb=str
End Function
</SCRIPT>

<DIV id=showvb class=show alt="결과">결과 표시창</DIV>
<DIV class=show onClick="showvb.innerHTML=FreeSpaceTestvb()">
  <SPAN class=ie>VBScript</SPAN> <SPAN class=property>FreeSpace</SPAN> 속성 예제</DIV>