我使用以下代码来获取今天的日期。我如何更改此代码以获得昨天的日期?
<%
' 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
%>
VBScript 将日期存储为从初始日期算起的天数数值。要计算相对日期,只需在初始值中添加或减去相应的整数天数即可。
在开头添加一行:
Date = DateAdd("d", -1, Date) ' Alternately Date - 1
FormatDateTime(Date)
函数在一行中执行此操作。 VBScript 实现受到限制,不支持其他语言中可用的常规格式选项。