Scripting Runtime Library(FileSystemObject)

지정한 파일이나 폴더가 있는 드라이브의 드라이브 문자를 반환한다.

인수
object : (개체)

object는 항상 File 또는 Folder 개체이다.

: (속성 문자열)

속성값은 지정한 파일이나 폴더가 있는 드라이브의 드라이브 문자를 나타내는 문자열이다.

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


Drive 속성 예제

결과 표시창
JScript Drive 예제
<SCRIPT language=JScript>
function DriveTest(filePath){
  var fso,fileObj,str;
  fso=new ActiveXObject('Scripting.FileSystemObject');
  fileObj=fso.GetFile(filePath);
  driveObj=fso.GetDrive(fileObj.Drive);
  str='"'+fileObj.Name+'"은 Drive "'+fileObj.Drive+'"에 있다.<BR>';
  str+='File 경로: '+fileObj.Path+'<BR>';
  str+='File 만든 날짜: '+fileObj.DateCreated+'<BR>';
  str+='드라이브 여유공간: '+driveObj.AvailableSpace+' byte';
  return(str);
}
</SCRIPT>

<DIV id=showjs class=show alt="결과">결과 표시창</DIV>
<DIV class=show
  onClick="id=showjs.innerHTML=DriveTest('C:\\JsTest\\expSample.txt')">
<SPAN class=ie>JScript</SPAN> <SPAN class=property>Drive</SPAN> 예제</DIV>

VBScript로 반복

결과 표시창
VBScript Drive 예제
<SCRIPT language=VBScript>
Function DriveTestvb(filePath)
  Dim fso,fileObj,str
  Set fso=CreateObject("Scripting.FileSystemObject")
  Set fileObj=fso.GetFile(filePath)
  Set driveObj=fso.GetDrive(fileObj.Drive)
  str="'"&fileObj.Name&"'은 Drive '"&fileObj.Drive&"'에 있다.<BR>"
  str=str&"File 경로: "&fileObj.Path&"<BR>"
  str=str&"File 만든 날짜: "&fileObj.DateCreated&"<BR>"
  str=str&"드라이브 여유공간:"&driveObj.AvailableSpace&" byte"
  DriveTestvb=str
End Function
</SCRIPT>

<DIV id=showvb class=show alt="결과">결과 표시창</DIV>
<DIV class=show
  onClick="showvb.innerHTML=DriveTestvb('C:\\JsTest\\expSample.txt')">
<SPAN class=ie>VBScript</SPAN> <SPAN class=property>Drive</SPAN> 예제</DIV>