asp之日期和時間函數樣本

來源:互聯網
上載者:User

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) 轉化為長時間格式

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.