Date ASP昨天日期

我使用以下代码来获取今天的日期。如何更改此代码以获得昨天的日期

<%
' NewDate
 ddate = DatePart("d",Date)
 mdate = DatePart("m",Date)
 ydate = DatePart("yyyy",Date)
 if ddate <= 9 then
 ddate = "0" & ddate
 end if
 if mdate <= 9 then
 mdate = "0" & mdate
 end if
 newdate = ydate & "-" &  mdate & "-" &  ddate
%> 

将日期存储为从初始日期算起的天数数值。要计算相对日期，只需从初始值中加上或减去相应的整数天数

在开头添加一行：

Date = DateAdd("d", -1, Date) ' Alternately Date - 1

根据您控制系统日期格式的能力，您还可以使用该功能在单行中执行此操作。VBScript实现是有限的，不支持其他语言中可用的常规格式选项。
我不建议这样做，请坚持使用内置函数，如在VBScript中操纵日期，这正是它们的用途。另外，“VBScript实现是有限的”是一个用词不当的说法，它只受您自己的限制。有关格式化VBScript日期的信息，请参见@Lankymart我已将DateAdd作为首选解决方案-谢谢。从您的参考答案“默认情况下，经典ASP中的日期格式选项有限”。我想说，不支持所有可能的格式字符串仍然是一个限制。