ASP时间戳函数'把标准时间转换为UNIX时间戳
FunctionToUnixTime(strTime,intTimeZone)IfIsEmpty(strTime)orNotIsDate(strTime)ThenstrTime=NowIfIsEmpty(intTimeZone)orNotisNumeric(intTimeZone)ThenintTimeZone=0ToUnixTime=DateAdd("h",-intTimeZone,strTime)ToUnixTime=DateDiff("s","1970-01-0100:00:00",ToUnixTime)EndFunction'把UNIX时间戳转换为标准时间FunctionFromUnixTime(intTime,intTimeZone)IfIsEmpty(intTime)orNotIsNumeric(intTime)ThenFromUnixTime=Now()ExitFunctionEndIfIfIsEmpty(intTime)orNotIsNumeric(intTimeZone)ThenintTimeZone=0FromUnixTime=DateAdd("s",intTime,"1970-01-0100:00:00")FromUnixTime=DateAdd("h",intTimeZone,FromUnixTime)EndFunction'调用方法：'示例：ToUnixTime("2009-12-0512:52:25",+8)，返回值为1259988745'response.WriteToUnixTime("2009-12-0512:52:25",+8)'示例：FromUnixTime("1259988745",+8)，返回值2009-12-0512:52:25'response.WriteFromUnixTime("1259988745",+8)转载来源网络
