复制文件夹不用剪贴板,使用系统文件操作对象就好了CreateObject("scripting.filesystemobject").copyfolder "c:\Program Files", "D:\Program Files"