Scripting Runtime Library(FileSystemObject)

지정한 파일의 버전 번호를 반환한다.

인수/파라메터
object
필수적인 요소이며, 항상 FileSystemObject의 이름이다.
filePath
필수적인 요소이며, 지정한 파일의 경로(절대 또는 상대 경로)이다.
반환값

반환값 sVersion는 filePath로 지정된 위치의 파일의 버전을 나타내는 문자열이다.

설명

지정한 파일의 버전 번호를 반환한다.

filePath이 명명된 구성 요소로 끝나지 않으면 GetFileVersion 메서드는 빈 문자열("")을 반환한다.

참고: GetFileVersion 메서드는 주어진 경로 문자열에만 사용한다.
경로를 결정하지 않고 지정한 경로가 있는지도 검사하지 않는다.

GetFileVersion 메서드 예제

결과 표시창
JScript C:\\JsTest GetFileVersion 메서드 예제
JScript C:C:\\Windows GetFileVersion 메서드 예제
<SCRIPT language=JScript>
function GetFileVersionTest(filePath){
  var fso,str='';
  fso=new ActiveXObject('Scripting.FileSystemObject');
  folderObj=fso.GetFolder(filePath);
  enumObj=new Enumerator(folderObj.Files);
  for (; !enumObj.atEnd(); enumObj.moveNext()){
    fileObj=enumObj.item();
    if (((filePath=='C:\\Windows')&&(fso.GetFileVersion(fileObj)))||(filePath!='C:\\Windows')){
      str+=fileObj.Path+' : ';
      if (fso.GetFileVersion(fileObj)) str+=fso.GetFileVersion(fileObj);
      else str+='정보 없음';
      str+='<BR>';
    }
  }
  return(str);
}
</SCRIPT>

<DIV id=showjs class=show alt="결과">결과 표시창</DIV>
<DIV class=show onClick="id=showjs.innerHTML=GetFileVersionTest('C:\\JsTest')">
  <SPAN class=ie>JScript</SPAN> C:\\JsTest <SPAN class=method>GetFileVersion</SPAN> 메서드 예제</DIV>
<DIV class=show onClick="id=showjs.innerHTML=GetFileVersionTest('C:\\My Documents')">
  <SPAN class=ie>JScript</SPAN> C:\\My Documents <SPAN class=method>GetFileVersion</SPAN> 메서드 예제</DIV>
결과 표시창
VBScript C:\\JsTest GetFileVersion 메서드 예제
VBScript C:\\Windows GetFileVersion 메서드 예제
<SCRIPT language=VBScript>
Function GetFileVersionTestvb(folderPath)
  Dim fso,fileVersion
  str=""
  Set fso=CreateObject("Scripting.FileSystemObject")
  Set folderObj=fso.GetFolder(folderPath)
  Set filesCol=folderObj.Files

  For Each fileObj in filesCol
    fileVersion=fso.GetFileVersion(fileObj)
    If folderObj=fso.GetSpecialFolder(0)  Then
      If Len(fileVersion)<>0 Then
         str=str&fileObj.Path&" : "&fileVersion&"<BR>"
      End If
    Else
      If Len(fileVersion)<>0 Then
        str=str&fileObj.Path&" : "&fileVersion&"<BR>"
      Else
        str=str&fileObj.Path&" : 정보 없음<BR>"
      End If
    End If
  Next
  GetFileVersionTestvb=str
End Function
</SCRIPT>

<DIV id=showvb class=show alt="결과">결과 표시창</DIV>
<DIV class=show onClick="showvb.innerHTML=GetFileVersionTestvb('C:\\JsTest')">
  <SPAN class=ie>VBScript</SPAN> C:\\JsTest <SPAN class=method>GetFileVersion</SPAN> 메서드 예제</DIV>
<DIV class=show onClick="showvb.innerHTML=GetFileVersionTestvb('C:\\My Documents')">
  <SPAN class=ie>VBScript</SPAN> C:\\My Documents <SPAN class=method>GetFileVersion</SPAN> 메서드 예제</DIV>