vbs子文件夹文件

1. vbs将指定路径的文件复制到一个文件夹的所有子文件夹下

Dim fso
set fso=CreateObject("Scripting.FileSystemObject")
‘"C:\Users\Administrator\Desktop\TEST","拷贝的文件夹路径名称
fso.CopyFolder "C:\Users\Administrator\Desktop\TEST","C:\Users\Administrator\Desktop\1"
set fso=nothing
msgbox " complete！"