文件备份vbs脚本

1. objs = "c:\aaa\*" '支持UNC路径  
2. objd = "d:\aaa\"  
3. '请自行修改上面两个路径  
4. Set objshell = CreateObject("Scripting.FileSystemObject")  
5. objshell.CopyFolder(Objs,objD) '当文件存在时默认进行覆盖操作