Scripting Runtime Library(FileSystemObject)

폴더를 기존 위치에서 다른 위치로 반복 복사한다.

인수/파라메터

objectName

필수적인 요소이며, 항상 FileSystemObject의 이름이다.

source

필수적인 요소이며, 복사할 하나 이상의 폴더에 대한 문자열 폴더이다. 와일드카드 문자를 사용할 수 있다.

와일드카드 문자(*)는 source 인수의 마지막 경로 구성 요소에만 사용할 수 있다.

destination

필수적인 요소이며, 폴더와 source의 하위 폴더를 복사할 문자열 대상이다. 와일드카드 문자는 사용할 수 없다.

overwrite

선택적인 요소이며, 기존 폴더를 덮어쓸지 여부를 나타내는 부울값이다.
부울값이 true이면 파일을 덮어쓰고, false이면 덮어쓰지 않는다. 기본값은 true이다.

설명

source에 와일드카드 문자를 사용하거나 destination이 경로 구분 기호(\)로 끝나면 destination은 일치하는 폴더와 하위 폴더를 복사할 기존 폴더를 나타낸다.
그렇지 않으면 destination은 만들려는 폴더의 이름을 나타낸다.
둘 중 어느 경우라도 개별 폴더를 복사할 때 아래 네 가지 경우가 일어날 수 있다.

• source가 없으면 source 폴더와 그 내용이 모두 복사된다. 일반적인 경우이다.
• destination이 기존 파일이면 오류가 발생한다.
• destination이 디렉터리이면 폴더와 그 내용이 모두 복사된다.
  source가 이미 destination에 있고, overwrite가 false이면 오류가 발생한다.
  그렇지 않으면 기존 파일을 덮어쓰게 된다.
• destination이 읽기 전용 디렉터리이고 기존의 읽기 전용 파일을 그 디렉터리로 복사하려고 할 때 overwrite가 false이면 오류가 발생한다.

와일드카드 문자를 사용한 source와 일치하는 폴더가 없으면 오류가 발생한다.

CopyFolder 메서드는 첫 번째 오류가 발생하면 그 상태로 중지한다.
이때 오류가 발생하기 전에 변경된 사항은 되돌릴 수 없다.

CopyFolder 메서드 예제

<SCRIPT language=JScript>
function CopyFolderTest(source,destination){
  fso=new ActiveXObject('Scripting.FileSystemObject');
  fso.CopyFolder(source,destination);
  str='"'+source+'"가 "'+destination+'"으로 복사되었다.';
  return(str);
}
</SCRIPT>

<DIV id=showjs class=show alt="결과">결과 표시창</DIV>
<DIV class=show
  onClick="showjs.innerHTML=
    CopyFolderTest('C:\\JsTest\\test\\*','C:\\JsTest\\CopyTest\\')">
  <SPAN class=ie>JScript</SPAN> <SPAN class=method>CopyFolder</SPAN> 메서드 예제</DIV>

<SCRIPT language=VBScript>
Function CopyFolderTestvb(source,destination)
  Dim fso,folderObj
  Set fso=CreateObject("Scripting.FileSystemObject")
  fso.CopyFolder source,destination
  str="'"&source&"'가 '"&destination&"'으로 복사되었다."
  CopyFolderTestvb=str
End Function
</SCRIPT>

<DIV id=showvb class=show alt="결과">결과 표시창</DIV>
<DIV class=show
  onClick="showvb.innerHTML=
    CopyFolderTestvb('C:\\JsTest\\test\\*','C:\\JsTest\\CopyTest\\')">
  <SPAN class=ie>VBScript</SPAN> <SPAN class=method>CopyFolder</SPAN> 메서드 예제</DIV>

그러나 다음과 같이 사용할 수는 없다.

<SCRIPT language=JScript>
fso=new ActiveXObject("Scripting.FileSystemObject");
fso.CopyFolder("c:\\mydocuments\\*\\*","c:\\tempfolder\\")
</SCRIPT>

<SCRIPT language=VBScript>
  Set fso=CreateObject("Scripting.FileSystemObject")
fso.CopyFolder "c:\mydocuments\*\*","c:\tempfolder\"
</SCRIPT>