objs = "c:\aaa\*" '支持UNC路径
objd = "d:\aaa\"
'请自行修改上面两个路径
Set objshell = CreateObject("Scripting.FileSystemObject")
objshell.CopyFolder(Objs,objD) '当文件存在时默认进行覆盖操作
本文由 华域联盟 原创撰写:华域联盟 » 文件备份vbs脚本
转载请保留出处和原文链接:https://www.cnhackhy.com/15210.htm
objs = "c:\aaa\*" '支持UNC路径
objd = "d:\aaa\"
'请自行修改上面两个路径
Set objshell = CreateObject("Scripting.FileSystemObject")
objshell.CopyFolder(Objs,objD) '当文件存在时默认进行覆盖操作
本文由 华域联盟 原创撰写:华域联盟 » 文件备份vbs脚本
转载请保留出处和原文链接:https://www.cnhackhy.com/15210.htm