需要帮助填充数字月份和日期前导0

Question

我在一个批处理文件中工作,需要填充一个带有前导0的数字,如果低于10.我有环境变量中的值.它们是月和日,我需要填充以匹配我正在反对的文件结构.我正在使用vbscript返回以下列格式"7/16/2009"返回的日期.需要它看起来像"07/16/2009",并且最需要的是每个项目都在单独的EV中.

VBscript的:

WScript.Echo DateAdd("d", Date, -36)

批量:

for /F "tokens=1-3 delims=/" %%x in ('cscript //nologo get36thday.vbs') do (
   SET YYYY=%%z
   SET MM=%%x
   SET DD=%%y)

Answer 1

VBScript中:

dteOldDate = Now()
strNewDate = Right("00" & Month(dteOldDate), 2) & "/" & Right("00" & Day(dteOldDate), 2) & "/" & Year(dteOldDate)