asp中日期时间函数介绍
基本函数
date() 获取日期,格式:2004-2-28
time() 获取时间,格式:22:24:59
now() 获取日期和时间 格式: 2005-5-2 22:37:30
使用方法:
d=date()
获取年份:year(d)
获取月份:month(d)
获取日子:day(d)
获取星期几:weekday(d)
t=time()
获取小时:hour(t)
获取分钟:minute(t)
获取秒数:second(t)
========================================
日期相加函数:DateAdd(interval, number, date)
可用该函数从日期中添加或减去指定时间间隔。
参数说明:
interval-运算的基准间隔
number-加上多少,可为负数
date-基准日期
下面是interval的可选值,注意加上引号:
设置 | 描述 |
---|---|
yyyy | 年 |
q | 季度 |
m | 月 |
y | 一年的日数 |
d | 日 |
w | 一周的日数 |
ww | 周 |
h | 小时 |
n | 分钟 |
s | 秒 |
举例:
1、计算明天:
tomorrow=DateAdd("d",1,date())
2、2012年12月1日的前一天:
preday=DateAdd("d",-1,"2012-12-1")
更详细用法请搜索。
========================================
日期间隔函数-DateDiff(interval, date1, date2[, firstdayofweek][, firstweekofyear]])
计算两个日期之间相差的间隔。
例如,可以使用 DateDiff 来计算两个日期之间相隔几日,或计算从今天起到年底还有多少个星期。如果date1比date2 晚,则返回负数。
参数说明:
interval-同DateAdd()函数
Date1,date2 -进行运算的两个日期
可选参数:
firstdayofweek- 指定一个星期的第一天的常数。如果未予指定,则以星期日为第一天。
当计算两个日期相差几周时(时间间隔符号 “w” 或 “ww”),该参数会影响结果。具体请搜索。
firstweekofyear-指定一年的第一周怎么确定,如果未予指定,则以包含 1 月 1 日的星期为第一周。具体请搜索。
========================================
其他函数:
DateSerial(year, month, day) -将数值换算为日期变量,返回值类型同date()函数。例如,如果day=35,则自动计算到下个月。再例如,DateSerial(1990 - 10, 8 - 2, 1 - 1) 则计算1990 年8月1日的十年零两个月又一天 之前的日期,也就是1980年5月31日。
DatePart(interval, date[,firstdayofweek[, firstweekofyear]]) -返回指定时间部分的数值。例如,可以使用DatePart 计算某个日期是星期几或目前为几点钟。参数同上面。
DateValue(date)-将各种日期格式串转化为日期变量,返回值类型同date()函数。例如,除了 12/30/1991 和 12/30/91 之外,DateValue 也识别 December 30, 1991 和 Dec 30, 1991。
TimeValue(time)-将各种时间格式串转化为时间变量。原理同DateValue。
TimeSerial(hour, minute, second) -将数值转化为时间变量,返回值类型和time()函数相同。原理同DateSerial。
Timer()-午夜开始到现在经过的秒数。
以下是使用例子:
now() 获取当前系统日期和时间,asp输出可以这样写:<%=now()%>
Year(now()) 获取年份, ASP输出:<%=Year(now())%>
Month(now()) 获取当前月份,ASP输出:<%=Month(now())%>
day(now()) 获取当天数,ASP输出:<%=day(now())%>
Minute(now()) 获取分钟数,ASP输出:<%=Minute(now())%>
Second(now()) 获取秒钟数,ASP输出:<%=Second(now())%>
date() 获取当前系统日期,格式为:2004-2-28
time() 获取当前系统时间,格式为:22:24:59
DateAdd函数(时间向后)
DateAdd("h",13,Now())其中"h"代表小时,13代表加上13小时,now()是现在的日期时间,也可以"h"可以改变:
设置 描述
yyyy 年
q 季度
m 月
y 一年的日数
d 日
w 一周的日数
ww 周
h 小时
n 分钟
s 秒
用时间间隔的方法减去一定的天数
代码如下:
Function Date1()
Dim NewTime as DateTime
NewTime = DateTime.Now.Subtract( New TimeSpan(7, 0, 0, 0) )
NewTime = NewTime.Format("MM/dd/yyyy", DateTimeFormatInfo)
response.write(NewTime)
End Function
Public Function Date2()
Dim NewTime as DateTime
NewTime = DateTime.Now.AddDays(-7)
Dim s as string = NewTime
return s
End Function
Function Date3()
Dim NewTime as DateTime = now.addDays(-7)
response.write(System.String.Format("{0:MM/dd/yyyy}",NewTime))
End Function
Function Date4()
Dim NewTime as DateTime
NewTime = now.addDays(-7)
return NewTime.ToString()
End Function
Public Function Date5()
Dim NewTime as DateTime
NewTime = Now()
return newtime.toLongTimeString()
End Function
Public Function Date6()
Dim NewTime as DateTime
NewTime = Now()
return newtime.toShortTimeString()
End Function
Public Function Date7()
Dim NewTime as DateTime
NewTime = Now()
return newtime.toLongDateString()
End Function
Public Function Date8()
Dim NewTime as DateTime
NewTime = Now()
return newtime.toShortDatestring()
End Function
Function Date9()
Dim NewTime as DateTime
NewTime = DateTime.Now.Subtract( New TimeSpan(7, 0, 0, 0) )
return formatdatetime(NewTime, 0)
End Function
Function Date10()
Dim NewTime as DateTime
NewTime = DateTime.Now.Subtract( New TimeSpan(7, 0, 0, 0) )
return formatdatetime(NewTime, 1)
End Function
Function Date11()
Dim NewTime as DateTime
NewTime = DateTime.Now.Subtract( New TimeSpan(7, 0, 0, 0) )
return formatdatetime(NewTime, 2)
End Function
Function Date12()
Dim NewTime as DateTime
NewTime = DateTime.Now.Subtract( New TimeSpan(7, 0, 0, 0) )
return formatdatetime(NewTime, 3)
End Function
Function Date13()
Dim NewTime as DateTime
NewTime = DateTime.Now.Subtract( New TimeSpan(7, 0, 0, 0) )
return formatdatetime(NewTime, 4)
End Function
Function Date14()
Dim NewTime as DateTime = now.addDays(-7)
dim s as string
s = (System.String.Format("{0:dddd}",NewTime))
Return s
End Function
Function Date15()
Dim MyDate as DateTime
Dim MyWeekDay as Integer
MyDate = Now.AddDays(-5)
MyWeekDay = Weekday(MyDate)
return MyWeekDay
End Function
Function Date16()
Dim MyDate as DateTime
Dim MyMonth as Integer
MyDate = Now.AddDays(-5)
MyMonth = Month(MyDate)
return MyMonth
End Function
Function Date17()
Dim MyDate as String
MyDate = Format(Now(), "yyyy")
return MyDate
End Function
DateDiff 函数
返回 Variant (Long) 的值,表示两个指定日期间的时间间隔数目。
语法
DateDiff(interval, date1, date2[, firstdayofweek][, firstweekofyear]])
DateDiff 函数语法中有下列命名参数:
部分 描述
interval 必要。字符串表达式,表示用来计算date1 和 date2 的时间差的时间间隔
Date1□date2 必要;Variant (Date)。计算中要用到的两个日期。
Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定,则以星期日为第一天。
firstweekofyear 可选。指定一年的第一周的常数。如果未予指定,则以包含 1 月 1 日的星期为第一周。
设置
interval 参数的设定值如下:
设置 描述
yyyy 年
q 季
m 月
y 一年的日数
d 日
w 一周的日数
ww 周
h 时
n 分钟
s 秒
firstdayofweek 参数的设定值如下:
常数 值 描述
vbUseSystem 0 使用 NLS API 设置。
vbSunday 1 星期日(缺省值)
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
常数 值 描述
vbUseSystem 0 用 NLS API 设置。
vbFirstJan1 1 从包含 1 月 1 日的星期开始(缺省值)。
vbFirstFourDays 2 从第一个其大半个星期在新的一年的一周开始。
vbFirstFullWeek 3 从第一个无跨年度的星期开始。
说明
DateDiff 函数可用来决定两个日期之间所指定的时间间隔数目。例如,可以使用 DateDiff 来计算两个日期之间相隔几日,或计算从今天起到年底还有多少个星期。
为了计算 date1 与 date2 相差的日数,可以使用“一年的日数”(y) 或“日”(d)。当 interval 是“一周的日数”(w) 时,DateDiff 返回两日期间的周数。如果 date1 是星期一,DateDiff 计算到 date2 为止的星期一的个数。这个数包含 date2 但不包含 date1。不过,如果 interval 是“周”(ww),则 DateDiff 函数返回两日期间的“日历周”数。由计算 date1 与 date2 之间星期日的个数而得。如果 date2 刚好是星期日,则 date2 也会被加进 DateDiff 的计数结果中;但不论 date1 是否为星期日,都不将它算进去。
如果 date1 比 date2 来得晚,则 DateDiff 函数的返回值为负数。
firstdayofweek 参数会影响使用时间间隔符号 “W” 或 “WW” 计算的结果。
如果 date1 或 date2 是日期文字,则指定的年份成为该日期的固定部分。但是,如果 date1 或 date2 用双引号 (" ") 括起来,且年份略而不提,则在每次计算表达式 date1 或 date2 时,当前年份都会插入到代码之中。这样就可以书写适用于不同年份的程序代码。
在计算 12 月 31 日和来年的 1 月 1 日的年份差时,DateDiff 返回 1 表示相差一个年份,虽然实际上只相差一天而已。