asp之日期和时间函数示例

可以使用日期和时间函数来得到各种格式的日期和时间

函数	语法	说明	示例
Now	Now()	取得系统当前的日期和时间	Dim MyVar MyVar = Now ' MyVar 包含当前的日期和时间。
Date	Date()	取得系统当前的日期	Dim MyDate MyDate = Date ' MyDate 包含当前系统日期。
Time	Time()	取得系统当前的时间	Dim MyTime MyTime = Time ' 返回当前系统时间。
Year	Year(Date)	取得给定日期的年份	Dim MyDate, MyYear MyDate = #October 19, 1962# '分派一日期。 MyYear = Year(MyDate) ' MyYear 包含 1962。
Month	Month(Date)	取得给定日期的月份	Dim MyVar MyVar = Month(Now) ' MyVar包含当前月对应的数字。
Day	Day(Date)	取得给定日期是几号	Dim MyDay MyDay = Day("October 19, 1962") 'MyDay包含 19。
Hour	Hour(time)	取得给定时间是第几小时	Dim MyTime, MyHour MyTime = Now MyHour = Hour(MyTime) ' MyHour 包含代表当前时间的数值。
Minute	Minute(time)	取得给定时间是第几分钟	Dim MyVar MyVar = Minute(Now)
Second	Second(time)	取得给守时间是第几秒	Dim MySec MySec = Second(Now) 'MySec 包含代表当前秒的数字。
WeekDay	WeekDay(Date)	取得给定日期是星期几的整数，1表示星期日，2表示星期一，依此类推	Dim MyDate, MyWeekDay MyDate = #October 19, 1962# ' 分派日期 MyWeekDay = Weekday(MyDate) ' MyWeekDay 包含 6,MyDate 代表星期五
DateDiff	DateDiff("Var",Var1,Var2) Var:日期或时间间隔因子，有如下参数： yyyy 年 m月 d 日 ww星期 h小时 s秒 Var1:第一个日期或时间 Var2:第二个日期或时间，比Var1晚	计算两个日期或时间的间隔	DateDiff("d",Date(),#1/1/2005#) '返回离2005元旦还有多少 DateDiff("h",Date(),#1/1/2005#) '返回离2005元旦还有多少小时 DateDiff("d",#1/1/2003#,#1/1/2005#) '返回两个日期之间的天数
DateAdd	DateDiff("Var",Var1,Var2) Var:日期或时间间隔因子： Var1:日期或时间间隔倍数 Var2:日期或时间的基准	对两个日期或时间作加法	如下示例将 95 年 1 月 31 日加上一个月： NewDate = DateAdd("m", 1, "31-Jan-95") 在这个示例中，DateAdd 返回 95 年 2 月 28 日，而不是 95 年 2 月 31 日。如果 date 为 96 年 1 月 31 日，则返回 96 年 2 月 29 日，这是因为 1996 是闰年。 如果计算的日期是在公元 100 年之前，则会产生错误。
FormatDateTime	FormatDateTime(Date,vbShortDate)	转化为短日期格式	FromatDateTime(Date(),vbLongDate) "以长日期格式显示
	FormatDateTime(Date,vbLongDate)	转化为长日期格式
	FormatDateTime(Date,vbShortTime)	转化为短时间格式
	FormatDateTime(Date,vbLongTime)	转化为长时间格式