2017-09-23 13 views

답변

0

가장 좋은 방법은 robocopy를 활용하는 것입니다 ...하지만 vbscript에서 수행해야하는 경우 ... 여기 간단한 방법이 있습니다.

아래의 실행 방법은 사용자 인터페이스에서 숨김으로 실행됩니다.

Set fso = CreateObject("Scripting.FileSystemObject") 
Set oshell = CreateObject("WScript.Shell") 
EmptyFolder=oshell.ExpandEnvironmentStrings("%userprofile%") & "\Empty" 

if NOT (fso.folderexists(EmptyFolder)) Then fso.CreateFolder(EmptyFolder) 

oShell.run "robocopy ""%userprofile%\Empty"" ""%tmp%"" /purge", 0, true 

if (fso.folderexists(EmptyFolder)) Then fso.DeleteFolder(EmptyFolder)