oyr520

尝试改为rar所在的路径也是没有rar压缩包
@echo off
setlocal EnableDelayedExpansion
Rar = "C:\Program Files\WinRAR\WinRAR.exe"
cd /d "%~dp0"
set files="2.txt" "cd.txt" "stdout.txt" "stderr.txt"
2>nul md user_rar
for %%A in (%files%) do (
  set "t=%%~tA"
  set "t=!t:-=!"
  set "t=!t:/=!"
  set "t=!t::=!"
  set "t=!t: =_!"
  goto break
)
:break
Rar a "user_rar\DSFC_DSNB_!t!.rar" %files%
endlocal

oyr520

回复 2# flashercs
感谢大佬，我测试后能生成文件夹，但文件夹里面没有rar压缩包，请帮忙再看看，谢谢！
我在C盘目录下测试的（固态硬盘没有做分区）

flashercs

@echo off
setlocal EnableDelayedExpansion
cd /d "%~dp0"
set files="2.txt" "cd.txt" "stdout.txt" "stderr.txt"
2>nul md user_rar
for %%A in (%files%) do (
  set "t=%%~tA"
  set "t=!t:-=!"
  set "t=!t:/=!"
  set "t=!t::=!"
  set "t=!t: =_!"
  goto break
)
:break
rar.exe a "user_rar\DSFC_DSNB_!t!.rar" %files%
endlocal
复制代码