找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
楼主: oyr520

[文件操作] 如何批处理(bat),rar打包当前目录下的指定文件,打包名字可以自定义加文件修改日期

[复制链接]
发表于 2021-11-30 10:53:04 | 显示全部楼层
  1. @echo off
  2. setlocal EnableDelayedExpansion
  3. cd /d "%~dp0"
  4. @REM set rar="C:\Program Files\WinRAR\WinRAR.exe"
  5. set rar="rar.exe"
  6. set files="2.txt" "cd.txt" "stdout.txt" "stderr.txt"
  7. set comh="include\com.h"
  8. 2>nul md user_rar
  9. for %%A in (%files%) do (
  10.   set "t=%%~tA"
  11.   set "t=!t:-=!"
  12.   set "t=!t:/=!"
  13.   set "t=!t::=!"
  14.   set "t=!t: =_!"
  15.   goto break
  16. )
  17. :break
  18. set stack=0
  19. for /f "usebackq tokens=1*" %%A in (%comh%) do (
  20.   if "!stack!"=="0" (
  21.     if /i "%%B"=="(CUSTOMER_BOARD_TYPE == CUSTOMER_ZY_SP10)" set stack=1
  22.   ) else if "!stack!"=="1" (
  23.     for /f "tokens=1*" %%C in ("%%B") do (
  24.       if "%%C"=="VERSION_NUMBER" (
  25.         set "vn=%%~D"
  26.         goto break2
  27.       )
  28.     )
  29.   )
  30. )
  31. :break2
  32. echo vn=[!vn!]
  33. %rar% a "user_rar\DSFC_DSNB_!vn!_!t!.rar" %files%
  34. endlocal
  35. pause
复制代码
回复 15# oyr520
 楼主| 发表于 2021-11-30 12:09:08 | 显示全部楼层
回复 16# flashercs
非常满意,头像支付宝二维码有效吗?想给个小小红包感谢大佬
发表于 2021-11-30 14:20:37 | 显示全部楼层
回复 17# oyr520
  1. 有效,感谢
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-20 20:27 , Processed in 0.026629 second(s), 14 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表