日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

    
        
    歡迎訪問 生活随笔!

    生活随笔

    當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

    编程问答

    asp中日期时间函数介绍

    發(fā)布時間:2023/11/30 编程问答 34 豆豆
    生活随笔 收集整理的這篇文章主要介紹了 asp中日期时间函数介绍 小編覺得挺不錯的,現(xiàn)在分享給大家,幫大家做個參考.

    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)
    獲取秒數(shù):second(t)

    ========================================

    日期相加函數(shù):DateAdd(interval, number, date)
    可用該函數(shù)從日期中添加或減去指定時間間隔。

    參數(shù)說明:

    interval-運算的基準間隔
    number-加上多少,可為負數(shù)
    date-基準日期

    下面是interval的可選值,注意加上引號:

    設置 描述
    yyyy 年
    q 季度
    m 月
    y 一年的日數(shù)
    d 日
    w 一周的日數(shù)
    ww 周
    h 小時
    n 分鐘
    s 秒

    舉例:
    1、計算明天:
    tomorrow=DateAdd("d",1,date())
    2、2012年12月1日的前一天:
    preday=DateAdd("d",-1,"2012-12-1")

    更詳細用法請搜索。

    ========================================
    日期間隔函數(shù)-DateDiff(interval, date1, date2[, firstdayofweek][, firstweekofyear]])
    計算兩個日期之間相差的間隔。
    例如,可以使用 DateDiff 來計算兩個日期之間相隔幾日,或計算從今天起到年底還有多少個星期。如果date1比date2 晚,則返回負數(shù)。

    參數(shù)說明:

    interval-同DateAdd()函數(shù)
    Date1,date2 -進行運算的兩個日期

    可選參數(shù):

    firstdayofweek- 指定一個星期的第一天的常數(shù)。如果未予指定,則以星期日為第一天。
    當計算兩個日期相差幾周時(時間間隔符號 “w” 或 “ww”),該參數(shù)會影響結(jié)果。具體請搜索。
    firstweekofyear-指定一年的第一周怎么確定,如果未予指定,則以包含 1 月 1 日的星期為第一周。具體請搜索。

    ========================================
    其他函數(shù):
    DateSerial(year, month, day) -將數(shù)值換算為日期變量,返回值類型同date()函數(shù)。例如,如果day=35,則自動計算到下個月。再例如,DateSerial(1990 - 10, 8 - 2, 1 - 1) 則計算1990 年8月1日的十年零兩個月又一天 之前的日期,也就是1980年5月31日。
    DatePart(interval, date[,firstdayofweek[, firstweekofyear]]) -返回指定時間部分的數(shù)值。例如,可以使用DatePart 計算某個日期是星期幾或目前為幾點鐘。參數(shù)同上面。
    DateValue(date)-將各種日期格式串轉(zhuǎn)化為日期變量,返回值類型同date()函數(shù)。例如,除了 12/30/1991 和 12/30/91 之外,DateValue 也識別 December 30, 1991 和 Dec 30, 1991。
    TimeValue(time)-將各種時間格式串轉(zhuǎn)化為時間變量。原理同DateValue。
    TimeSerial(hour, minute, second) -將數(shù)值轉(zhuǎn)化為時間變量,返回值類型和time()函數(shù)相同。原理同DateSerial。
    Timer()-午夜開始到現(xiàn)在經(jīng)過的秒數(shù)。
    以下是使用例子:
    now() 獲取當前系統(tǒng)日期和時間,asp輸出可以這樣寫:<%=now()%>
    Year(now()) 獲取年份, ASP輸出:<%=Year(now())%>
    Month(now()) 獲取當前月份,ASP輸出:<%=Month(now())%>
    day(now()) 獲取當天數(shù),ASP輸出:<%=day(now())%>
    Minute(now()) 獲取分鐘數(shù),ASP輸出:<%=Minute(now())%>
    Second(now()) 獲取秒鐘數(shù),ASP輸出:<%=Second(now())%>
    date() 獲取當前系統(tǒng)日期,格式為:2004-2-28
    time() 獲取當前系統(tǒng)時間,格式為:22:24:59
    DateAdd函數(shù)(時間向后)
    DateAdd("h",13,Now())其中"h"代表小時,13代表加上13小時,now()是現(xiàn)在的日期時間,也可以"h"可以改變:
    設置 描述
    yyyy 年
    q 季度
    m 月
    y 一年的日數(shù)
    d 日
    w 一周的日數(shù)
    ww 周
    h 小時
    n 分鐘
    s 秒
    用時間間隔的方法減去一定的天數(shù)
    復制代碼 代碼如下:
    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

    使用加負天數(shù)的方法減去一定的天數(shù)
    復制代碼 代碼如下:
    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

    格式化日期函數(shù)
    格式化成通用格式
    復制代碼 代碼如下:
    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 函數(shù)
    返回 Variant (Long) 的值,表示兩個指定日期間的時間間隔數(shù)目。
    語法
    DateDiff(interval, date1, date2[, firstdayofweek][, firstweekofyear]])
    DateDiff 函數(shù)語法中有下列命名參數(shù):
    部分 描述
    interval 必要。字符串表達式,表示用來計算date1 和 date2 的時間差的時間間隔
    Date1□date2 必要;Variant (Date)。計算中要用到的兩個日期。
    Firstdayofweek 可選。指定一個星期的第一天的常數(shù)。如果未予指定,則以星期日為第一天。
    firstweekofyear 可選。指定一年的第一周的常數(shù)。如果未予指定,則以包含 1 月 1 日的星期為第一周。

    設置
    interval 參數(shù)的設定值如下:
    設置 描述
    yyyy 年
    q 季
    m 月
    y 一年的日數(shù)
    d 日
    w 一周的日數(shù)
    ww 周
    h 時
    n 分鐘
    s 秒

    firstdayofweek 參數(shù)的設定值如下:
    常數(shù) 值 描述
    vbUseSystem 0 使用 NLS API 設置。
    vbSunday 1 星期日(缺省值)
    vbMonday 2 星期一
    vbTuesday 3 星期二
    vbWednesday 4 星期三
    vbThursday 5 星期四
    vbFriday 6 星期五
    vbSaturday 7 星期六
    常數(shù) 值 描述
    vbUseSystem 0 用 NLS API 設置。
    vbFirstJan1 1 從包含 1 月 1 日的星期開始(缺省值)。
    vbFirstFourDays 2 從第一個其大半個星期在新的一年的一周開始。
    vbFirstFullWeek 3 從第一個無跨年度的星期開始。
    說明
    DateDiff 函數(shù)可用來決定兩個日期之間所指定的時間間隔數(shù)目。例如,可以使用 DateDiff 來計算兩個日期之間相隔幾日,或計算從今天起到年底還有多少個星期。
    為了計算 date1 與 date2 相差的日數(shù),可以使用“一年的日數(shù)”(y) 或“日”(d)。當 interval 是“一周的日數(shù)”(w) 時,DateDiff 返回兩日期間的周數(shù)。如果 date1 是星期一,DateDiff 計算到 date2 為止的星期一的個數(shù)。這個數(shù)包含 date2 但不包含 date1。不過,如果 interval 是“周”(ww),則 DateDiff 函數(shù)返回兩日期間的“日歷周”數(shù)。由計算 date1 與 date2 之間星期日的個數(shù)而得。如果 date2 剛好是星期日,則 date2 也會被加進 DateDiff 的計數(shù)結(jié)果中;但不論 date1 是否為星期日,都不將它算進去。
    如果 date1 比 date2 來得晚,則 DateDiff 函數(shù)的返回值為負數(shù)。
    firstdayofweek 參數(shù)會影響使用時間間隔符號 “W” 或 “WW” 計算的結(jié)果。
    如果 date1 或 date2 是日期文字,則指定的年份成為該日期的固定部分。但是,如果 date1 或 date2 用雙引號 (" ") 括起來,且年份略而不提,則在每次計算表達式 date1 或 date2 時,當前年份都會插入到代碼之中。這樣就可以書寫適用于不同年份的程序代碼。
    在計算 12 月 31 日和來年的 1 月 1 日的年份差時,DateDiff 返回 1 表示相差一個年份,雖然實際上只相差一天而已。

    ?

    <%
    '作用:格式化時間(顯示)
    '參數(shù):一個是時間,一個是格式化的參數(shù)
    ' 1:"yyyy-mm-dd hh:mm:ss"
    ' 2:"yyyy-mm-dd"
    ' 3:"hh:mm:ss"

    ' 4:"yyyy年mm月dd日"
    ' 5:"yyyymmdd"
    ' 6:"yyyymmddhhmmss"
    ' 7:"yyyymmddhhmm"
    ' 8:"mm月dd日
    ' 9:dd日
    Function FormatTime(s_Time, n_Flag)
    Dim y, m, d, h, mi, s
    FormatTime = ""
    If IsDate(s_Time) = False Then Exit Function
    y = cstr(year(s_Time))
    m = cstr(month(s_Time))
    If len(m) = 1 Then m = "0" & m
    d = cstr(day(s_Time))
    If len(d) = 1 Then d = "0" & d
    h = cstr(hour(s_Time))
    If len(h) = 1 Then h = "0" & h
    mi = cstr(minute(s_Time))
    If len(mi) = 1 Then mi = "0" & mi
    s = cstr(second(s_Time))
    If len(s) = 1 Then s = "0" & s
    Select Case n_Flag
    Case 1
    ' yyyy-mm-dd hh:mm:ss
    FormatTime = y & "-" & m & "-" & d & " " & h & ":" & mi & ":" & s
    Case 2
    ' yyyy-mm-dd
    FormatTime = y & "-" & m & "-" & d
    Case 3
    ' hh:mm:ss
    FormatTime = h & ":" & mi & ":" & s
    Case 4
    ' yyyy年mm月dd日
    FormatTime = y & "年" & m & "月" & d & "日"
    case 5
    'yyyymmdd
    FormatTime= y&m&d
    case 6
    'yyyymmddhhmmss
    FormatTime=y&m&d&h&mi&s
    case 7
    'yyyymmddhhmm
    FormatTime=y&m&d&h&mi
    case 8
    FormatTime=m & "月" & d & "日"
    case 9
    FormatTime=d & "日"
    case else
    FormatTime = s_Time
    End Select
    End Function
    %>

    ?

    <%= FormatTime(rsnews("news_date"),8) %>

    ?

    轉(zhuǎn)載于:https://www.cnblogs.com/visense/archive/2013/02/12/2939939.html

    總結(jié)

    以上是生活随笔為你收集整理的asp中日期时间函数介绍的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。

    如果覺得生活随笔網(wǎng)站內(nèi)容還不錯,歡迎將生活随笔推薦給好友。