基本函式
日期及时间是以数值的数据型态储存,日期可以表示的范围为公元1 年1 月1 日到9999 年12月31 日,时间的部分为0:00:00 到23:59:59。要将指定的日期存入变量,使用如下语法:
dtVar=#mm/dd/yyyy#
或
dtVar=#mm-dd-yyyy#
<html>
<%
Dim dtMyBday As date
dtMyBday=#10/03/1973#
Response.Write("我的生日是" & Cstr(dtMyBday))
%>
</html>
<html>
<%
Dim dtMyBday As date
dtMyBday=#10/03/1973#
Response.Write("我的生日是民国" & Cstr(Year(dtMyBday)-1911) & "年")
%>
</html>
Response.Write(DateTime.Now)
Response.Write(DateTime.Today)
另外Now 以及Today 其实是对象型态的属性,分别有些自己的属性及方法,如下表所示:
DateSerial 函式
当我们需要对于日期做运算的时候,可以利用DateSerial 函式。若是直接对日期型态做运算,则会发生错误。DateSerial 函式可以传回指定的日期,语法如下所示:
dtVar=DateSerial(Year, Month, Day)
???????? 下列范例是取回一个月的最后一天后,存入日期型态变量dtLastDay:
<html>
<%
Dim dtLastDay As date
dtLastDay=DateSerial(Year(Now()),Month(Now)+1,1-1)
Response.Write("这个月的最后一天是:" & Cstr(dtLastDay))
%>
</html>
DateDiff(间隔参数, 日期一, 日期二)
日期相差的单位,必需使用下列表格的参数:
<html>
<%
Dim dtDate As date,intDiffDay as Integer
dtDate=Cdate(Request("Date"))
intDiffDay=DateDiff(DateInterval.Day,Now(),dtDate)
Response.Write("今天的日期是:" & CStr(Now()))
Response.Write("<br>您所输入的日期和今天相差:")
Response.Write(CStr(intDiffDay))
%>
</html>