Windows 7下批处理脚本次日日期计算错误求助

Windows 7的CMD原生日期处理能力有限，手动判断当月天数、闰年容易出错。推荐通过嵌入VBScript的方式实现准确的次日日期计算——VBScript是Windows 7自带组件，无需额外安装，能自动处理所有日期边界情况（月末、闰年2月等）。

以下是完整的BAT脚本，包含巴西葡萄牙语注释，可直接使用：

@echo off
chcp 1252 >nul  :: Configura codificação para suportar caracteres em português

:: Cria um script VBS temporário para calcular a data do dia seguinte
echo dt = DateAdd("d", 1, Date) > temp_date.vbs
echo dtStr = Right("0" ^& Day(dt), 2) ^& Right("0" ^& Month(dt), 2) ^& Year(dt) >> temp_date.vbs
echo WScript.Echo dtStr >> temp_date.vbs

:: Executa o script VBS e armazena a data formatada (DDMMYYYY) em uma variável
for /f %%a in ('cscript //nologo temp_date.vbs') do set PROXIMA_DATA=%%a

:: Remove o arquivo VBS temporário
del temp_date.vbs

:: Copia arquivos que contêm a data do dia seguinte no nome (ex: relatorio_01022024.pdf)
echo Copiando arquivos com a data %PROXIMA_DATA%...
copy "*%PROXIMA_DATA%*" "C:\Seu\Caminho\De\Destino\" /y

:: Mensagem de conclusão
echo Operação concluída!
pause

关键说明： #

• 格式调整：如果你的文件名使用其他日期格式（如DD/MM/YYYY或YYYYMMDD），只需修改VBS脚本中的dtStr行：
  • 若为DD/MM/YYYY：echo dtStr = Right("0" ^& Day(dt), 2) ^& "/" ^& Right("0" ^& Month(dt), 2) ^& "/" ^& Year(dt) >> temp_date.vbs
  • 若为YYYYMMDD：echo dtStr = Year(dt) ^& Right("0" ^& Month(dt), 2) ^& Right("0" ^& Day(dt), 2) >> temp_date.vbs
• 可靠性：VBScript的DateAdd函数会自动处理所有日期逻辑，无需手动判断当月天数、是否为闰年，彻底避免原脚本的计算错误。

内容的提问来源于stack exchange，提问作者Diego