microsoft vbscript 런타임 오류 error '800a004c

이 오류는 경로를 잘못 썼거나, 경로가 없거나, 권한이 없을 때 생긴다.

또한 경로를 만들려고 할 때 한꺼번에 두 개 이상의 폴더를 만들려고 할 때 생긴다.

 

'파일이 해당 경로에 없을 때

if not fileexists(cachedfile) then
  set fso=createobject("scripting.filesystemobject")

  '원본 파일을 가져온다.
  set file=fso.getfile(ssourcefile)

  '여기가 중요, 해당 경로가 없으면 경로를 만든다.

  '이때 한 번에 하나씩 만든다.
  if not fso.folderexists("d:\cache\" & filename1)  then
     fso.createfolder("d:\cache\" & filename1)
     fso.createfolder("d:\cache\" & filename1 & "\" & filename2)
  elseif not fso.folderexists("d:\cache\" & filename1 & "\" & filename2)  then
     fso.createfolder("d:\cache\" & filename1 & "\" & filename2)
  end if

  '가져온 원본 파일을 복사한다.
  file.copy(cachedfile)
  set file=nothing
  set fso=nothing
end if