- @echo off
- %1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
- rem 设置源目录
- set "SourDir=C:\123...\Settings"
- rem 设置备份路径
- set "CpDir=I:"
-
- set "SubCpDir=%ComputerName%\使用习惯备份_%date:~0,4%年%date:~5,2%月%date:~8,2%日\%SourDir:~3%"
- robocopy /e /copyall "%SourDir%" "%CpDir%\%SubCpDir%"
- pause
复制代码
|