求帮助BAT如何批量压缩文件至指定文件夹？

linplc

源文件在“D：DATA\”文件夹内需用批处理程序将文件内部，包括子文件夹下的文件最好批量压缩到U盘:原始数据\内
注意点1：“D：DATA\”文件夹下有不规则文件名的子文件，内付文件夹名CRH380B-6277仅供参考，非固定名称。
注意点2：源文件名称有固定时间格式，要求只能压缩当天的文件。
注意点3：所做操作不能变动源文件。
注意点4：压缩后的文件名保持为源文件名。如：2013年09月04日12_37_21_026检测_CRH380B-6277_ZE627704_4.sct 压缩成 2013年09月04日12_37_21_026检测_CRH380B-6277_ZE627704_4.rar

linplc

咋都没人跟帖呢

linplc

咋都没人跟帖呢

linplc

咋都没人跟帖呢

linplc

自己的摸索编写的，可以解决实际问题，与大家分享一下。

1. set y=%date:~0,4%
   
2. set m=%date:~5,2%
   
3. set d=%date:~8,2%
   
4. mkdir j:"%y%-%m%-%d%拷贝文件"
   
5. md  j:"%y%-%m%-%d%拷贝文件"\原始数据\
   
6. md  j:"%y%-%m%-%d%拷贝文件"\台账\
   
7. md  j:"%y%-%m%-%d%拷贝文件"\其他\
   
8. set k=%y%年%m%月%d%日
   
9. pushd "D:\Program Files\LUII探伤检测系统上位机V2.1.7R2\_recvfile\010"
   
10. "%programfiles%\WinRAR\rar.exe" a -r-m1 "%y%%m%%d%".rar "%y%%m%%d%\*"
    
11. move "%y%%m%%d%".rar "j:"%y%-%m%-%d%拷贝文件"\台账"
    
12. cd /d d:\
    
13. for /f " tokens=4,1-5 delims=\." %%a in ('dir  /s /b /a-d %k%*.sct') do ("C:\Program Files\WinRAR\WinRAR.exe" a -ep1 -r0 -m1 -inul -exit -- "j:"%y%-%m%-%d%拷贝文件"\原始数据\%%d.rar" "%%a\%%b\%%c\%%d.%%e" )
    
14. for /f " tokens=5,1-6 delims=\." %%e in ('dir  /s /b /a-d %k%*.sct') do ("C:\Program Files\WinRAR\WinRAR.exe" a -ep1 -r0 -m1 -inul -exit -- "j:"%y%-%m%-%d%拷贝文件"\原始数据\%%i.rar" "%%e\%%f\%%g\%%h\%%i.%%j" )
    
15. pause

复制代码