ASP的UNIX时间戳与标准时间转换

人气:
49
日期:
2019/9/29
HTML 网页设计 W3C 49

摘要:ASP的UNIX时间戳与标准时间转换

ASP的UNIX时间戳与标准时间转换

'把标准时间转换为UNIX时间戳
Function ToUnixTime(strTime, intTimeZone)
    If IsEmpty(strTime) or Not IsDate(strTime) Then strTime = Now
    If IsEmpty(intTimeZone) or Not isNumeric(intTimeZone) Then intTimeZone = 0
    ToUnixTime = DateAdd("h",-intTimeZone,strTime)
    ToUnixTime = DateDiff("s","1970-01-01 00:00:00", ToUnixTime)
End Function
 
'把UNIX时间戳转换为标准时间
Function FromUnixTime(intTime, intTimeZone)
    If IsEmpty(intTime) or Not IsNumeric(intTime) Then
        FromUnixTime = Now()
        Exit Function
    End If         
    If IsEmpty(intTime) or Not IsNumeric(intTimeZone) Then intTimeZone = 0
    FromUnixTime = DateAdd("s", intTime, "1970-01-01 00:00:00")
    FromUnixTime = DateAdd("h", intTimeZone, FromUnixTime)
End Function
调用方法:
'示例:ToUnixTime("2009-12-05 12:52:25", +8),返回值为1259988745 
'response.Write ToUnixTime("2009-12-05 12:52:25", +8)
'示例:FromUnixTime("1259988745", +8),返回值2009-12-05 12:52:25 
'response.Write FromUnixTime("1259988745", +8)



Copyright © 2014 ASP技巧教程源码大全 All Rights Reserved
晋ICP备14006235号-3 页面执行时间:77.148毫秒 返回顶部

?分享按钮