Scripting Runtime Library(FileSystemObject)

로컬 컴퓨터에 사용할 수 있는 모든 Drive 개체로 구성된 Drives 컬렉션을 반환한다.

인수
object : (개체)

항상 FileSystemObject이다.

: (속성 컬렉션)

로컬 컴퓨터에 사용할 수 있는 모든 Drive 개체로 구성된 Drives 컬렉션을 반환한다.

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

설명

Enumerator 개체와 for 문장등 루프문장을 사용하여 Drives 컬렉션의 구성원들을 반복 실행시킬 수 있다.

이동식 매체 드라이브를 Drives 컬렉션에 나타내기 위하여 이동식 매체 드라이브에 매체를 삽입할 필요는 없다.



Drives 속성 예제

결과 표시창
JScript Drives 예제
<SCRIPT language=JScript>
function DrivesTest(){
  var fso,enumObj,enumObj,enum1,str='';
  fso=new ActiveXObject('Scripting.FileSystemObject');
  enumObj=new Enumerator(fso.Drives);
  for (; !enumObj.atEnd(); enumObj.moveNext()){
    enum1=enumObj.item();
    str=str+enum1.DriveLetter+' - ';
    if (enum1.DriveType==3) driveObj=enum1.ShareName;
    else if (enum1.IsReady) driveObj=enum1.VolumeName;
    else driveObj='[드라이브가 준비되지 않았다.]';
    str+=driveObj+'<BR>';
  }
  return(str);
}
</SCRIPT>

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

VBScript로 반복

VBScript로 같은 내용을 For Each...Next 구조를 사용하여 Drives 컬렉션의 구성원들을 반복 실행시킨 예제.

결과 표시창
VBScriptDrives 예제
<SCRIPT language=VBScript>
Function DrivesTestvb
  Dim fso,driveObj,drivesCol,driveVar,str
  Set fso=CreateObject("Scripting.FileSystemObject")
  Set drivesCol=fso.Drives
  For Each driveObj in drivesCol
    driveVar=""
    str=str&driveObj.DriveLetter&" - "
    If driveObj.DriveType=3 Then
      driveVar=driveObj.ShareName
    Elseif driveObj.IsReady Then
      driveVar=driveObj.VolumeName
    Else
      driveVar="[드라이브가 준비되지 않았다.]"
    End If
    str=str&driveVar&"<BR>"
  Next
  DrivesTestvb=str
End Function
</SCRIPT>

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