ASP时间戳函数

admin

'把标准时间转换为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)
来源：https://blog.csdn.net/baidu_29994443/article/details/72190515
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！