asp之日期和時(shí)間函數(shù)示例

2024-05-04 11:01:16

字體：大中小

來(lái)源：轉(zhuǎn)載

供稿：網(wǎng)友

asp之日期和時(shí)間函數(shù)示例

可以使用日期和時(shí)間函數(shù)來(lái)得到各種格式的日期和時(shí)間

函數(shù) 語(yǔ)法說(shuō)明示例

Now Now() 取得系統(tǒng)當(dāng)前的日期和時(shí)間 Dim MyVar MyVar = Now ' MyVar包含當(dāng)前的日期和時(shí)間。

Date Date() 取得系統(tǒng)當(dāng)前的日期 Dim MyDate MyDate = Date ' MyDate包含當(dāng)前系統(tǒng)日期。

Time Time() 取得系統(tǒng)當(dāng)前的時(shí)間 Dim MyTime MyTime = Time
' 返回當(dāng)前系統(tǒng)時(shí)間。

Year Year(Date) 取得給定日期的年份 Dim MyDate, MyYear MyDate = #October 19, 1962#
'分派一日期。
MyYear = Year(MyDate) ' MyYear包含 1962。

Month Month(Date) 取得給定日期的月份 Dim MyVar MyVar = Month(Now)
' MyVar包含當(dāng)前月對(duì)應(yīng)的數(shù)字。

Day Day(Date) 取得給定日期是幾號(hào) Dim MyDay MyDay = Day("October 19, 1962")
'MyDay包含 19。

Hour Hour(time) 取得給定時(shí)間是第幾小時(shí) Dim MyTime, MyHour MyTime = Now MyHour = Hour(MyTime) ' MyHour包含代表當(dāng)前時(shí)間的數(shù)值。

Minute Minute(time) 取得給定時(shí)間是第幾分鐘 Dim MyVar MyVar = Minute(Now)

Second Second(time) 取得給守時(shí)間是第幾秒 Dim MySec MySec = Second(Now) 'MySec包含代表當(dāng)前秒的數(shù)字。

WeekDay WeekDay(Date) 取得給定日期是星期幾的整數(shù)，1表示星期日，2表示星期一，依此類(lèi)推 Dim MyDate, MyWeekDay MyDate = #October 19, 1962#
' 分派日期
MyWeekDay = Weekday(MyDate) 'MyWeekDay 包含 6,MyDate 代表星期五

DateDiff DateDiff("Var",Var1,Var2)
Var:日期或時(shí)間間隔因子，有如下參數(shù)：
yyyy 年 m月 d 日 ww星期 h小時(shí) s秒

Var1:第一個(gè)日期或時(shí)間
Var2:第二個(gè)日期或時(shí)間，比Var1晚計(jì)算兩個(gè)日期或時(shí)間的間隔 DateDiff("d",Date(),#1/1/2005#)
'返回離2005元旦還有多少
DateDiff("h",Date(),#1/1/2005#)
'返回離2005元旦還有多少小時(shí)
DateDiff("d",#1/1/2003#,#1/1/2005#)
'返回兩個(gè)日期之間的天數(shù)

DateAdd