ASP中日期函数的大全

ASP中日期函数的大全

1. Now 传回系统的日期及时间。

使用方法：无　例：Now 传回值：2002/11/2 10:23:30 AM　备注：无

2. Date 传回系统的日期。

使用方法：无　例：Date 传回值：2002/11/2　备注：无

3. Time 传回系统的时间。

使用方法：无　例：Time 传回值：10;23:30 AM　备注：无

4. Year 传回系统的年份。

使用方法：Year[(1-3的时间函式)]例：Year(Now) 传回值：2002备注：无

5. Month 传回系统的月份。

使用方法：Month[(1-3的时间函式)]例：Month(Now) 传回值：11备注：无

 

6. Weekday 传回系统的星期几的数字。

使用方法：Weekday(1-3的时间函式,[星期天的开始数字])例：Weekday(Now,7) 传回值：14

备注：若不设定开始数字，则星期天为1，.....星期六为7。设定了则由星期天累加。

7. Day 传回系统的日子。

使用方法：Day[(1-3的时间函式)]例：Day(Now) 传回值：2备注：无

8. Hour 传回系统的小时。

使用方法：Hour[(1-3的时间函式)]例：Hour(Now) 传回值：11备注：无

9. Minute 传回系统的分钟。

使用方法：Minute[(1-3的时间函式)]例：Minute(Now) 传回值：23备注：无

10. Second 传回系统的秒。

使用方法：Second[(1-3的时间函式)]例：Second(Now) 传回值：30备注：无

11. Cdate 转换成日期变量型态。

使用方法：Cdate(日期表达式，上篇1-3项)例：Cdate(Now) 传回值：2002/11/2 10:23:30 AM

12.DateAdd 用以计算时差，即时间加减。

使用方法：DateAdd("时间代码",加减数,日期表达式)

例：DateAdd("H",2,Now) 传回值：2002/11/2 12:23:30 AM备注：日期表达式看备注

13. DateDiff 计算两段时间差距。

使用方法：DateDiff("时间代码",日期表达式1,日期表达式2)

例：DateDiff("H","2002/11/2 12:23:30 AM",Now) 传回值：2备注：日期表达式看备注

14. DatePart 传回一个日期中的一部分。

使用方法：DatePart("时间代码",日期表达式)例：Part("H",Now) 传回值：10

备注：日期表达式看备注

15. DateSerial 转换三个参数为日期形态。

使用方法：DateSerial(年,月,日)

例：DateSerial(2002,11,2) 传回值：2002/11/2备注：无

16. Date＆#118alue 转换日期字符串成日期形态。

使用方法：Date＆#118alue("日期字符串")

例：DateAdd("November 2,2002") 传回值：2002/11/2备注：无

17. IsDate 检查变量是否为日期形态或字符串可否转成日期。

使用方法：Date＆#118alue("日期字符串")

例：Date＆#118alue("November 2,2002") 传回值：True备注：无

18. MonthName 传回月份的名称。

使用方法：MonthName("日期字符串")例：MonthName(Now) 传回值：November备注：无

19. TimeSerial 转换三个参数为时间形态。

使用方法：TimeSerial(时,分,秒)例：TimeSerial(10,23,30) 传回值：10:23:30备注：无

20. WeekDayName 传回周几的名称。

使用方法：WeekDayName("日期字符串")例：WeekDayName(Now) 传回值：Saturday

【备注】以上内容皆假设该时间为2002年11月2日上午10时23分30秒星期六[...]内的参数可有可无。

时间代码(表达式)：

yyyy 年q 季n 月d 日w 星期h 时m 分s 秒

函数 语法 说明 示例

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#函数 语法 说明 示例

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) 转化为长时间格式