我使用以下代码来获取今天的日期。如何更改此代码以获取昨天的日期?
<%
' 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
%>
答案 0 :(得分:2)
VBScript将日期存储为初始日期的天数值。要计算相对日期,只需从初始值中添加或减去相应的积分天数。
在开头添加一行:
Date = DateAdd("d", -1, Date) ' Alternately Date - 1
根据您控制系统日期格式的能力,您还可以使用FormatDateTime(Date)
功能在一行中执行此操作。 VBScript实现是有限的,不支持其他语言中提供的常规格式选项。